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1.0 GENERAL INFORMATION 
1.1 PROGRAM ABSTRACT 


THIS PRODUCT IS THE PDP-11 FUNCTIONAL TESTING DIAGNOSTIC FOR 
THE DEULA. A CONFIGURATION OF UP TO EIGHT DELUA UNITS WILL 
BE ACCEPTED FOR TEST. 


THIS DIAGNOSTIC WILL ONLY OPERATE IN A STAND ALONE, OFFLINE 
ENVIRONMENT USING THE DELUA OPERATIONAL MICROCODE. FAILURE 
IDENTIFICATION WILL GENERALLY BE TO THE FAILING DELUA FUNCTION. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, AND PAPER TAPE. 
FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER TO 
THE XXDP+ USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF THE 
RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT. 


1.2 SYSTEM REQUIREMENTS 


THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DELUA FUNCTIONAL 
TESTING DIAGNOSTIC: 


PDP-11 CPU FROM SUPPORTED LIST (SEE BELOW) 
16K MEMORY 
CONSOLE TERMINAL 
DELUA, WITH H4080 LOOPBACK CONNECTOR INSTALLED, IF PLAN TO RUN 
EXTERNAL LOOPBACK TEST. 
SUPPORTED PDP-11 CPU'S: 
11/24, 11/34A,11/44,11/70,11/84 
1.3 RELATED DOCUMENTS AND STANDARDS 
XXDP+ USER'S MANUAL - CHQUS 
1.4 DIAGNOSTIC HIERARCHY PREREQUISITES 
THE TESTS INCLUDED IN THIS DELUA FUNCTIONAL DIAGNOSTIC AKE 
ARRANGED IN A TEST HIERARCHY. TESTS SHOULD BE EXECUTED IN 
CONSECUTIVE ORDER FOR MAXIMUM FAULT ISOLATION. 
1.5 ASSUMPTIONS 
2.0 OPERATING INSTRUCTIONS 


THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 


2.1 COMMANDS 
THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 


ae 
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(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 
RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONT INUE CONTINUE AT TEST THAT WAS INTERRUPTED CAFTER tC) 
PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 
ADD ACTIVATE A UNIT FOR TESTING CALL UNITS ARE 


CONSIDERED TO BE ACTIVE AT START TIME 


DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION CIF IMPLEMENTED 
BY THE DIAGNOSTIC - SECTION 4.0) 

DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3) 

ZFLAGS CLEAR ALL FLAGS (SEE SECTION 2.3) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. SO 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “START”. 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD’. 


SWITCH EFFECT 
/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10. 
THIS LIST WILL CAUSE TESTS 1,5.7,8,9,10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS:DDDDD EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS. FLAGS ARE DESCRIBED 
IN SECTION 2.3. 
/EOP :DDD0D REPORT END OF PASS MESSAGE AFTER EVERY 
DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 
IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 CUNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 
START/TESTS: 1-5/PASS :1000/E0P: 100 _ 
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-5” INSTEAD OF “/TESTS:1-5". 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 
COMMAND. 


| ll, 
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TESTS PASS FLAGS EOP UNITS 


2.3 FLAGS 


FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 
a ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER« INHIBIT ALL ERROR REPORTS 

IBE* INHIBIT ALL ERROR REPORTS EXCEPT 


FIRST LEVEL (CFIRST LEVEL CONTAINS 


ERROR TYPE, NUMBER, PC, TEST AND UNIT) 
IXE* INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO'S) 
PRI DIRECT MESSAGES TO LINE PRINTER 
PNT PRINT TEST NUMBER AS TEST EXECUTES 
BOE “BELL” ON ERROR 
UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 
ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 


IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION CON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*#ERROR MESSAGES ARE DESCRIBED IN SECTION 3.3 


SEE THE XXDP+ USER’S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 





meee eeeemassmcarcccrcsacel, LC EL LLL 
USER DOCUMENTATION MACRO YO5.02 Friday 12-Jul-85 09:33 Page 5-5 SEQ 7 


AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 
/FLAGS :LOE: IER: BOE 


2.4 HARDWARE QUESTIONS 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING “CHANGE HW (L) ?” 

YOU MUST ANSWER “Y” AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN “PRELOADED” USING THE SETUP UTILITY CSEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A “Y", THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS CIN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 


WHAT IS THE PCSRO ADDRESS ? 
THIS IS THE ADDRESS AT WHICH PCSRO RESIDES ON THE UNIBUS. 
THE ALLOWABLE RANGE IS 174510 - 174600 OCTAL. 

WHAT IS THE VECTOR ADDRESS ? 


THIS IS THE INTERRUPT VECTOR ADDRESS FOR THIS DEVICE. 
THE ALLOWABLE RANGE IS 120 - 210 OCTAL. 


SAMPLE DIALOGUE: 
UNIT 0 


WHAT IS THE PCSRO ADDRESS? (0) ? 174510 
WHAT IS THE VECTOR ADDRESS? (0) ? 120 


UNIT 1 
WHAT IS THE PCSRO ADDRESS? (0) ? 174520 
WHAT IS THE VECTOR ADDRESS (0) ? 130 


2.5 SOFTWARE QUESTIONS 
AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 
OR CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 
PARAMETERS. THESE PARAMETFRS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 
OPERATION MODES. YOU WILL BE PROMPTED BY “CHANGE SW CL) ?” 

IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING “Y”. 

THE FOLLOWING IS THE ONLY SOFTWARE QUESTION FOR THIS DEVICE: 

RUN TEST 26 EXTERNAL LOOPBACK TEST? 


THE DEFAULT IS NO (€ No skips test 26,This means that 
Externel Loopback will not be tested 


et ell). 
YES, WILL LOOP A FRAME USING EXTERNAL LOOPBACK MODE. 


SAMPLE DIALOGUE: 
RUN TEST 26 EXTERNAL LOOPBACK TEST ? (L) N ? Y <CR> 


2.6 EXTENDED P-TABLE DIALOGUE 
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WHEN YOU ANSWER THE: HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 

UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 

A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 


TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 

A FICTIONAL DEVICE, THE XY11. SUPPOSE THIS DEVICE CONSISTS OF 

A CONTROL MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS 0 THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE 0 OR 1. BELOW IS A SIMPLE WAY 

TO BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS. 


@ UNITS (D) ? 8<CR> 


UNIT i 

CSR ADDRESS (0) 7 174510<CR> 
SUB-DEVICE @ (0) ? O<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 2 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 1<CR> 
Q-FACTOR (0) 1 ? O<CR> 


UNIT 3 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 2<CR> 
G-FACTOR (0) 0 ? <CR> 


UNIT 4 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 3<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 5 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 4<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 6 

CSR ADORESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 5S<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 7 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 6<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 8 
CSR ADDRESS (0) 174510<CR> 
SUB-DEVICE # (0) ? 7<CR> 


quays. aa» 
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Q-FACTOR (0) 1 ? <CR> 


NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 


AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 
NOT VERY EFFICIENT. 


THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
A ae THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


# UNITS (0D) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 0,1<CR> 
Q-FACTOR (0) 0 ? 1,0<CR> 


UNIT 3 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 2-5<CR> 
Q-FACTOR (0) 0 ? O<CR> 


UNIT 7 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE # (0) ? 6,7<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 174510 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE 

“." CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE, SUB-DEVICES 
2, 3, 4 AND 5 WERE SPECIFIED. (CIF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 174510 AND O RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 


@ UNITS (D) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 174510<CR> 
SUB-DEVICE ¢ (0) ? 0-7<CR> 
Q-FACTOR (0) 0 ? 0.1.0; ,cok- 2¢CR> 
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AS YGU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 


2.7 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 
1. BOOT XXDP-+ 
2. GIVE THE DATE AND ANSWER ANY QUESTIONS 


3. TYPE “R NAME”, WHERE NAME IS THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 


_ TYPE “START” 

_ ANSWER THE “CHANGE HW” QUESTION WITH “Y” 
_ ANSWER ALL THE HARDWARE QUESTIONS 

_ ANSWER THE “CHANGE SW“ QUESTION WITH “N” 


WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 
DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS. THESE DEFAULTS 
ARE DESCRIBED IN SECTIONS 2.3 AND 2.5. 


3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE “IER” FLAG IS SET (SECTION 2.3). 

THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC: XXXXXX 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR NUMBER 
UNIT NUMBER = 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE "IER” OR “IBE” FLAGS ARE SET (SECTION 2.3). THESE MESSAGES 
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 

SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “IER”, “IBE” OR “IXE” FLAGS ARE SET CSECTION 2.3). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 SPECIFIC ERROR MESSAGES 


anu oO UW & 
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ALL ERROR REPORTS FOR THIS DIAGNOSTIC ARE SELF -EXPLANATORY 
AND WHENEVER POSSIBLE CALLS OUT THE FAILING DELUA FUNCTION. 
WHENEVER A DATA COMPARE ERROR IS REPORTED THE “SHOULD BE” AND 
“WAS” DATA WILL ALSO BE REPORTED. 


THE FOLLOWING IS A LIST OF ALL THE POSSIBLE ERRORS: 
REGISTER ACCESS ERROR 

DATA COMPARE ERROR IN PCSR2 

DATA COMPARE ERROR IN PCSRS 

DNI BIT FAILED TO SET AFTER DEVICE RESET 

SELF TEST FAILURE 

WRITING ONE TO CLEAR ONI BIT FAILED 

NO ONI INTERRUPT OCCURED AFTER GET PCBB PORT COMMAND 
DNI BIT FAILED TO SET AFTER NOP PORT COMMAND 

ONI BIT FAILED TO SET AFTER GET PCBB PORT COMMAND 
DNI BIT FAILED TO SET AFTER GET CMD PORT COMMAND 
DNI BIT FAILED TO SET AFTER START PORT COMMAND 


0 SET 
WRITING ONE TO — BIT FAILED 


TO SE 
WRITING ONE TO CLEAR RXI BIT FAILED 
TIMEOUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF RORB 
TIMEOUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF TORB 
DNI BIT FAILED TO SET AFTER STOP PORT COMMAND 
DATA COMPARE ERROR IN TRANSMIT DESCRIPTOR RING 
DATA COMPARE ERROR IN RECEIVE DESCRIPTOR RING 
TRANSMIT-RECEIVE DATA COMPARE ERROR 
CRC COMPARE ERROR 
INTERNAL ROM CRC COMPARE ERROR 
RCBI BIT FAILED TO SET 
TIMEOUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF FIRST TORS 
TIMEOUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF SECOND TORB 
TIMEQUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF FIRST RORB 
TIMEOUT ERROR - DELUA FAILED TO RELINQUISH OWNERSHIP OF SECOND RORB 


a" 
~< 
H 
ao 
H 
— 
"i 
= 
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 - 
m 
o 
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FATAL ERROR - DELUA ID BIT NOT SET 

ERROR - LOOPBACK SUCCESSFUL WITH INVALID DESTINATION ADDRESS 
INTERNAL RAM MEMORY DATA COMPARE ERROR 

ONI BIT FAILED TO SET AFTER SELF TEST PORT COMMAND 

‘BUFL', IN TORB+6 NOT SET ON XMIT BUFF OVERFLOW WITH <DTCR=0> 
‘BUFL', IN TORB+6 NOT SET ON XMIT BUFF OVERFLOW WITH <DTCR=1> 
PCSRO INTERRUPT BIT CLEAR ERROR 

RECEIVED PACKET COUNTER NOT GREATER THAN 0 


4.0 PERFORMANCE AND PROGRESS REPORTS 
AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. 


THE “EOP” SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END 
OF PASS MESSAGE IS PRINTED. SECTION 2.2 DESCRIBES SWITCHES. 
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5.0 DEVICE INFORMATION TABLES 


AT THE COMPLETION CF THE FIRST PASS FOR EACH DEVICE BEING TESTED 
DEVICE INFORMATION FOR THAT DEVICE IS PRINTED. THIS PRINTOUT 
CONTAINS THE ETHERNET DEFAULT ADDRESS, THE ROM MICROCODE VERSION, 
AND THE SWITCH PACK SETTINGS FOR SELF TEST LOOP AND REMOTE BOOT. 


EXAMPLE PRINTOUT: 
ETHERNET DEFAULT ADDRESS (HEX): AA-00-03-00-00-02 
ROM MICROCODE VERSION (DECIMAL): 1 
SWITCH PACK SET FOR : 
SELF TEST LOOP DISABLED 


REMOTE BOOT ENABLED 


NOTE: THIS INFORMATION MAY BE PRINTED WITHOUT RUNNING THE ENTIRE 
DIAGNOSTIC IF TEST 27 IS RUN SEPARATELY VIA THE /TESTS:27 


SUPERVISOR SWITCH. 
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6.0 TEST SUMMARIES 


TEST 1: PCSRO READ ACCESS 
VERIFIES: 


A DEVICE IS PRESENT AT THE PCSRO 
UNIBUS ADDRESS SPECIFIED. 


TEST 2: PCSR1 READ ACCESS 
VERIFIES: 


A DEVICE IS PRESENT AT THE PCSR1 
UNIBUS ADDRESS SPECIFIED. 


TEST 3: PCSRi DELUA ID BIT 
VERIFIES: 


BIT 06, AND NO OTHER BITS IN THE 
PCSRi DEVICE ID FIELD IS SET. 


TEST 4: PCSR2 READ ACCESS 
VERIFIES: 


A DEVICE IS PRESENT AT THE PCSR2 
UNIBUS ADDRESS SPECIFIED. 


TEST 5: PCSR3 READ ACCESS 
VERIFIES: 


A DEVICE IS PRESENT AT THE PCSRS 
UNIBUS ADDRESS SPECIFIED. 


TEST 6: PCSR2 STATIC BIT 
VERIFIES: 
PCSR2 FOR ALL STUCK-AT-O (SAO) AND STUCK-AT-1 


(SAL) ERRORS. THE HOST WILL WRITE PATTERNS 
TO PCSR2, AND READ THEM BACK TO VERIFY. 


TEST 7: PCSR3 STATIC BIT 
VERIFIES: 
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PCSR3 FOR ALL SAO AND SAi ERRORS. THE HOST WILL 
WRITE PATTERNS TO PCSR3 AND READ THEM BACK TO VERIFY. 


TEST 8: SELF TEST 
VERIFIES: 


THE ROM BASED SELF TEST CAN BE RUN SUCCESSFULLY 
WHEN INVOKED VIA THE SELF TEST PORT COMMAND. 


TEST 9: PORT COMMAND 
VERIFIES: 


NO ERRORS OCCUR WHEN A DELUA PORT COMMAND IS 
ISSUED. 


TEST 10: INTERRUPT LOGIC 


VERIFIES: 
A DELUA INTERRUPT CAN BE GENERATED. 


TEST 11: READ INTERNAL ROM 


VERIFIES: 
INTERNAL ROM. 


TEST 12: READ/WRITE INTERNAL MEMORY 


VERIFIES: 
INTERNAL RAM CAN BE WRITTEN AND READ 


TEST 13: INTERNAL LOOPBACK 
VERIFIES: 


NO ERRORS OCCUR WHEN A DATAGRAM IS TRANSMIITED 
AND RECEIVED IN INTERNAL LOOPBACK MODE. 


TEST 14: FRC CHECKING 


VERIFIES: 
CRC CHECKING LOGIC IS OPERATIONAL. 


ee 


USER DOCUMENTATION 


TEST 15: 
TEST 16: 
TEST 17: 


TEST 18: 


TEST 19: 
TEST 20: 
TEST 21: 


TEST 22: 
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FORCE CRC ERROR 


VERIFIES: 
CRC ERROR DETECTION IS OPERATIONAL. 


NO RECEIVE BUFFER 
VERIFIES: 


A RECEIVE BUFFER ERROR CRCBI) CAN BE GENERATED. 


DISABLE RECEIVE CHAINING 


VERIFIES: 
DISABLE RECEIVE CHAINING MODE IS OPERATIONAL. 


TRANSMIT CHAINING ERROR 
VERIFIES: 
DETECTION OF A BUFFER LENGTH ERROR WILL CAUSE 


THE CORRESPONDING ERROR BIT, ‘BUFL’ TO SET IN 
THE TRANSMIT DESCRIPTOR RING. 


DATA CHAINING 


VERIFIES: 
TRANSMIT AND RECEIVE DATA CHAINING. 


PHYSICAL ADDRESS 


VERIFIES: 
PHYSICAL ADDRESS FUNCTION IS OPERATIONAL. 


MULTICAST ADDRESS 


VERIFIES: 
MULTICAST ADDRESS FUNCTION IS OPERATIONAL. 


PROMISCUOUS ADDRESS 


VERIFIES: 
THE DELUA IN PROMISCUOUS MODE WILL ACCEPT ALL 
PACKETS REGARDLESS OF DESTINATION ADDRESS. 


LS LL 
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TEST 23: ENABLE ALL MULTICAST 


VERIFIES: 
THE DELUA IN MULTICAST MODE WILL ACCEPT ALL 
PACKETS WITH MULTICAST DESTINATION ADDRESSES. 


TEST 24: INT. LOOPBACK TRANSMIT LENGTH ERROR 


VERIFIES: 
IF PORT DRIVER ATTEMPTS TO TRANSMIT GREATER THAN A 
32 BYTE <DTCR = O> OR 36 BYTE <DTCR = 1> TRANSMIT 
FRAME, THE DEVICE WILL RETURN A ‘TRANSMIT LENGTH’ 


ERROR. 


TEST 25: SIMULTANEOUS OPERATIONS 


VERIFIES: 
SIMULTANEOUS OPERATIONS CAN BE PERFORMED. 


TEST 26: EXTERNAL LOOPBACK (MANUAL INTERVENTION REQUIRED) 


VERIFIES: 
USING AN H4080 LOOPBACK CONNECTOR, INSURES NO 
ERRORS OCCUR WHEN A DATAGRAM IS TRANSMITTED AND 
RECEIVED IN EXTERNAL LOOPBACK MODE. 


TEST 27: PRINT DEVICE PARAMETERS 


VERIFIES: 
PRINTS THE DEFAULT PHYSICAL ADDRESS, THE MICROCODE 


REVISION, AND THE SWITCH PACK SETTINGS. 
& 


TS 





SEQ 16 








al, 
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=e . TITLE PROGRAM HEADER AND TABLES 
il 
ro .SBTTL PROGRAM HEADER 
832 ; .ENABL ABS,AMA 
833 -ENABL AMA 
834 3 . = 2000 
836 
837 000000 BGNMOD | 
838 : 
839 344 
840 ; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
841 ; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
843 = 
nae 000000 POINTER BGNRPT ,BGNSW,BGNSF T,BGNAU,BGNDU, ERRTBL 
846 
847 000000 HEADER CZUADA,A,0,11,0,340 
000000 LSNAME:: 
103 -ASCII /C/ 
000001 132 -ASCII /Z/ 
000002 125 -ASCII /U/ 
000003 101 ASCII /A/ 
0C0004 104 -ASCII /D/ 
000005 101 -ASCII /A/ 
000006 000 -BYTE 090 
900007 000 -BYTE 0 
000010 L$REV:: 
000010 101 -ASCII /A/ 
000011 L$DEPO:: 
000011 060 -ASCII /0/ 
000012 LSUNIT:: 
000012 000000 > © 
000014 LS$TIML:: 
000014 000011 D tii 
000016 L$HPCP:: 
000016 102676' D LSHARD 
000020 L$SPCP:: 
000020 103010’ ‘ L$SOFT 
000022 LSHPTP:: 
000022 000214’ P LS$HW 
000024 L$SPTP:: 
000024 000222’ -WORD LS$SW 
000026 LS$LADP:: 
000026 103132’ a L$LAST 
000030 L$STA:: 
000030 000000 -WORD 0O 
000032 L$CO:: 
000032 000000 -WORD 0O 
000034 LS$DTYP:: 
000034 000000 -WORD 0 
009036 LSAPT:: 
000036 000000 .WORD 0O 
000040 LS$DTP:: 
000040 000124’ .WORD LSDISPATCH 
000042 L$PRIO:: 





OO al, 


PROGRAM HEADER 
PROGRAM HEADER 
000042 
000044 
000044 
000046 
000046 
000050 
000050 
000051 
000052 
000052 
000054 
000056 
000056 
000060 
000960 
000062 
000062 
000064 
000064 


000066 
000066 
000070 
000070 
000072 
0C0072 
000074 
000074 
000076 
000076 
000100 
000100 

848 

849 


anne 


AND TABLES 


000340 
000000 
000000 


004 
000 


000000 
000000 


000000 
016660' 
033514' 
000000 
000000 
034356' 
034350’ 
000000 
016666 ' 
104035 
016650’ 
033530’ 
034342' 
034340' 
033522' 
000000 
000000 
000000 
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. WORD 
LSENVI: : 
WORD 


L$EXP1:: 
WOR 


LSMREV:: 

-BYTE 

-BYTE 
LSEF:: 

. WORD 

. WORD 
L$SPC:: 

. WORD 
L$DEVP:: 

. WORD 
L$REPP:: 

- WORD 
LSEXP4:: 

. WORD 
LSEXPS:: 

.W 
LS$AUT:: 

.WORD 
L$DUT: : 

. WORD 
L$LUN:: 
L$DESP:: 

P D 
L$LOAD: : 
LSETP:: 
L$ICP:: 
L$CCP:: 
L$ACP:: 

‘ D 
LS$PRT:: 

. WORD 
L$TEST:: 

-WORD 
L$DLY:: 

. WORD 
LS$HIME:: 

. WORD 





SEQ 18 


0 


CSREVISION 
CSEDIT 


0 
0 


0 
L$DVTYP 
L$RPT 





al, 
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DISPATCH TABLE 


859 


000033 


034444' 
034624 ' 
035012’ 
035220' 
035406 ' 
035574' 
036012' 
036230' 
040166' 
040616’ 
041170' 
041720' 
043160' 
044574' 
046156’ 
047576' 
050704’ 
052322' 
053614’ 
055424’ 
061106' 
065042 ' 
071302' 
073600' 
075244' 
077134‘ 
101000’ 


-SBTTL DISPATCH TABLE 


++ 
; THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
; IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


DISPATCH 27. 


. WORD 
L$DISPATCH:: 
WORD 





SEQ 19 





a 
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DEFAULT HARDWARE P-TABLE 
861 .SBTTL DEFAULT HARDWARE P-TABLE 
862 
863 3+¢ 
864 ; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
865 ; THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
866 ; IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
ots ; AND IS USED AS A “TEMPLATE” FOR BUILDING THE P-TABLES. 
yas 
869 
870 000212 BGNHW OFPTBL 
000212 000002 -WORD Li19000-L$HW/2 
000214 LSHW:: 
_ 000214 DFPTBL:: 
872 000214 0009000 .WORD O ; PCSRO - UNIBUS ADDRESS 
873 000216 000000 -WORD 0O ; DELUA INTERRUPT VECTOR 
874 900220 ENDHW 
000220 L10000: 





— 





al, 
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SOFTWARE P-TABLE 

876 .SBTTL SOFTWARE P-TABLE 

877 

878 ;++ 

879 ; THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 

880 ; PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 

881 ; SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 

882 ; AT RUN TIME. 

883 3-- 

884 

885 000220 BGNSW SFPTBL 
900220 000001 «WORD 1L19001-L$SW/2 
000222 L$SW:: 
000222 SFPTBL:: 

886 

887 

888 000222 000000 EXLOOP: .WORD 90 ; EXTERNAL LOOPBACK FLAG 

889 .EVEN 

890 000224 ENOSW 
000224 

891 

892 





——— ae 
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SOFTWARE P-TABLE 


936 000224 


-TITLE GLOBAL AREAS 
.SBTTL GLOBAL EQUATES SECTION 


3+ 
; THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
; ARE USED IN MORE THAN ONE TEST. 
= 
EQUALS 
3 
; BIT DIFINITIONS 


; 
BIT15== 100000 


100000 
040000 BIT14== 40000 
020000 BIT13== 20000 
010000 BIT12== 10000 
BIT11== 4000 
002000 BIT10== 2000 
001000 BITO9== 1000 
000400 BITO8== 400 
000200 BITO7== 200 
000100 BITO6== 100 
BITOS== 40 
000020 BITO4== 20 
000010 BITO3S== 10 
000004 BITO2== 4 
000002 BITO1== 2 
000101 BITOO== 1 
i 
001000 BIT9== BITOY 
000400 BIT8== BITOS 
000200 BIT7== BITO7 
000190 BIT6== BITO6 
000040 BITS== S8ITOS 
000020 BIT4== BIT04 
000010 BIT3== BITO3 
000004 BIT2== Biv 
000002 BITi== BITO1 
000001 BITO== BITOO 
; EVENT FLAG DEFINITIONS 
;  €F32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
: 
; ; BIT POSITION IN SECOND STATUS WORD 
000040 EF .START== 32. ; €100000) START COMMAND WAS ISSUED 
000037 EF .RESTART == 31. ; (040000) RESTART COMMAND WAS ISSUED 
000036 EF .CONTINUE== 30. ; (020000) CONTINUE COMMAND WAS ISSUED 
000035 EF .NEW== 29. ; (010000) A NEW PASS HAS BEEN STARTED 
000034 EF .PWR== 28. ; (004000) A POWER-FAIL/POWER-UP OCCURRED 


; 
; PRIORITY LEVEL DEFINITIONS 





_<— eel ce LD LLL 


SEQ 23 


REGISTER 0 
STATUS ERROR INTERRUPT 
PORT COMMAND ERROR INTERRUPT 
RECEIVE RING INTERRUPT 
TRANSMIT RING INTERRUPT 
DONE INTERRUPT 
RECEIVE BUFFER UNAVAILABLE 
FATAL ERROR INTERRUPT - 
TELL PORT DRIVER TO IGNORE CONTENTS 
OF PCSR1i 
SOLICITED STATE CHANGE INTERRUPT 


BITOS8 UN 
SERI+PCEI bmpetiens > gc +USCI 


; DELUA RESET 
;IDENTIFIES DEVICE TO HOST 
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GLOBAL EQUATES SECTION 
000340 PRIO7== 340 
000300 PRi06== 300 
000240 PRIOS== 240 
000200 PRI04== 200 
000140 PRIO3== 140 
000100 PRIO2== 100 
000040 PRIO1== 40 
000000 PRIOO== 0 
;OPERATOR FLAG BITS 
3 
000004 EVL== 4 
000010 LOT== 10 
000020 ADR== 20 
000040 IDU== 40 
000100 ISR== 100 
000200 UAM== 200 
000400 BOE== 400 
001000 PNT== 1000 
002000 PRI== 2000 
004000 IXE== 4000 
010000 IBE== 10000 
020000 IER== 20000 
040000 LOE== 40000 
on 100000 HOE== 100000 
; 
938 ; PCSRO - PORT CONTROL AND STATUS 
939 100000 SERI == BITiS : 
940 040000 PCEI ss BITi4 ; 
941 020000 RXI as BIT1i3 ; 
942 010000 TXI == BITi2 : 
943 004000 DNI zs BITil : 
944 002000 RCBI ss BITiO : 
945 001000 FATL Be BITO9 5 
946 ; 
947 ; 
948 000400 uSsCI a ; 
949 175400 CLINTB == 
950 ; 
951 000200 SERIB == BITO7 ; 
952 000100 PCEIB ==: BITO6 ; 
953 000040 RXIB BS BITOS ; 
954 000020 TXIB Be BITO4 : 
955 000010 IB las BITOS : 
956 000004 RCBIB == BITO2 ; 
957 900002 FATLIB == BITOL ; 
= 000001 USCIB == BITOO ; 
960 000200 INTR BS BITO7 : 
961 000100 INTE Bs BITO6 ; 
962 000040 RSET =s BITOS 
963 ; 
964 sDEVICE ID <06:04> 
965 ; 
966 sPORT COMMANDS <03:00> 
967 000001 GETPCB == BITOO 
968 000002 GETCMD == BITO1 


TE 1 TO CLEAR MASK - PCSRO UPPER BYTE 
STATUS ERROR INTERRUPT BYTE REFERENCE 
PORT COMMAND ERROR INTERRUPT BYTE REF 
RECEIVE RING INTERRUPT BYTE REF 
TRANSMIT RING INTERRUPT BYTE REF 
DONE INTERRUPT BYTE REF 
RECEIVE BUFFER UNAVAILABLE 
FATAL ERROR INTERRUPT BYTE REF. 
UNSOLICITED STATE CHANGE INTERRUPT BYTE REF. 


INTERRUPT SUMMARY <15:08> 
INTERRUPT ENABLE 


BITO4 SET ONLY = DELUA 





GLOBAL AREAS 
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GLOBAL EQUATES SECTION 


140377 


000200 


000010 


000020 


177770 


BITOO!BITO1 
BITO2 
BITO1!:B81ITO2 


BITOS 
BITO3!BITO2!BITO1 
BITO3S!BITO2]!:BITO1!BITOO 


“PCSR1 - PORT CONTROL AND STATUS REGISTER 1 


; 
PCTO 
; 

RMTC 


;DEVICE ID FIELD <06:04> 
BITO4 


DELUAT 


;PORT STATE <02:00> 
SMASK == 1 


; 
_ SELF TEST ERROR 
STMASK 


CODE <13:08> 
140377 ; SELF TEST MASK 


BITO7 ; PORT COMMAND TIMEOUT 
BITOS ; REMOTE CONSOLE RESERVED 


;DEVICE IS DELUA IF ONLY BIT SET 


77770 = —s-¢_: STATE MASK 
y 
RESET == 0 
PRILD == BITOO ; PRIMARY LOAD STATE 
READY == BITO1 
es BITOO!BITO1 

UNIHLT == BITOO!BIT02 
NIHLT == BITO1!BIT02 
NIUNI == BITOO!BIT01!B1T02 
a 
;DESCRIPTOR RING DEFINITIONS 
OWN == BIT15 
ERRS == BIT14 
STP ss BITO9 
ENP ss BITOS 
3 

ae BIT15 
;GLOBAL EQUATES 
ZERO == 0 
ONES == 177777 
TIMASK == 377 ; UPPER BYTE = ONES 
GOODST == 0 ; SUCCESSFUL SELF TEST CODE 
STATEM == 172377 ; MASK ALL PCSRO BITS EXCEPT STATE BITS 
CMODE1 == 175015 ; ALL SETABLE MODE BITS = ONES 
TORMSK == 7777 ; TOR MASK 
OTYPE == 2540 ; DIAGNOSTIC TYPE FIELD 
INITH == 0 ; INITIAL CRC VALUE 
;POLYH == 120001 ; CRC POLYNOMIAL 
POLYHI == 120001 CRC POLYNOMIAL 
G 
SIZ4K == 20000 ; 4K WORDS 
SIZ8K == SIZ4Ks2 ; 8K WORDS 
SECOND == 63. :63 LINE CLOCK TICKS = APROX. 1 SECOND 
IE ss 100 sINTERRUPT ENABLE FOR LINE CLOCK 











cl, 
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GLOBAL DATA SECTION 
1027 .SBTTL GLOBAL DATA SECTION 
1028 
1029 5o¢ 
1030 ; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
eo ; IN MORE THAN ONE TEST. 
or ; ADDRESSES FOR DELUA UNDER TEST 
; 
1035 000224 000000 PCSRO: .WORD 0 ; ADDRESS OF PCSRO 
1036 000226 900000 PCSR1: -WORD 0O ; ADDRESS OF PCSR1 
1037 000230 000000 PCSR2: .WORD O ; ADDRESS OF PCSR2 
1038 000232 000000 PCSR3: .WORD O ; ADDRESS OF PCSRS 
1039 000234 000000 CSROUB WORD 0O ; ADDRESS OF THE UPPER BYTE OF PCSRO 
— 000236 000000 PCShoc WORD 0O ; PCSRO DATA SAVE LOCATION 
; 
1042 000240 000000 INTVEC: .WORD 0O . ADDRESS OF DELUA INTERRUPT VECTOR 
1043 000242 000240 UNAPRI: .WORD 240 ; UNA PRIORITY = 5 
eee 000244 000000 UNIT: .WORD 0 ; UNIT NUMBER 
1046 000246 CLKTAB 
1047 000246 000000 CLKCSR: .WORD 0 s;LINE CLOCK STATUS REGISTER 
1048 000250 000000 CLKBR: -WORD 0 sLINE CLOCK PRIORITY 
1049 000252 000000 CLKVEC: .WORD 0 ;LINE CLOCK VECTOR 
ooae 000254 CLKFRE: .WORD 0 ;LINE CLOCK FREQUENCY 
: 
1052 256 000000 NEST WORD 0O ; DESTINATION ADDRESS 
1053 000260 000000 WORD 0O 
eos: 000262 000000 WORD 9QO 
1056 000264 000000 SRC: WORD 0O ; SOURCE ADDRESS 
1057 000266 000000 WORD 0 : 
pee 000270 000000 WORD 0 $ 
1060 000272 000000 DFAULT: .WORD 0 ; DEFAULT ADDRESS 
1061 000274 000010 -WORD 10 
1062 000276 000000 WORD 90 
1063 
1064 ; 
pe ;DATA STRUCTURES 
1067 00 PCBB: BLKW 4 ; PORT CONTROL BLOCK 
1068 000310 UDBB : BLKW 100. ; UNIBUS DATA BLOCK 
1069 000620 TORB: -BLKW 16. ; TRANSMIT DESCRIPTOR RING 
1070 60 RORB : BLKW i 3; RECEIVE DESCRIPTOR RING 
1071 000720 RORBE : BLKW 30. ; EXTENDED TORB 
1072 001014 TORX: BLKW 196 ; VERY EXTENDED TORB 
pes 001624 RORX : BLKW 196 ; VERY EXTENDED RDRB 
1075 002434 004000 -WORD TEND-TBUF s;LENGTH OF TRANSMIT BUFFERS IN BYTES 
76 002436 TBUF : -BLKW 128. ; TRANSMIT BUFFER 
1077 003036 TBUF 2: BLKW 128. 
1078 003436 TBUFS3: BLKW 128 
1079 004036 TBUF 4: BLKW 128 
1080 004436 TBUFS BLKW 128 
1081 005036 TBUF6 BLKW 128 
1082 005436 TBUF7 BLKW 128 
1083 006036 TBUFS BLKW 128 












ee seenenemned 
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GLOBAL DATA SECTION 
= 006436’ TEND =. 
1086 006436 004000 -WORD REND-RBUF ;LENGTH OF RECEIVE BUFFERS IN BYTES 
1087 006440 RBUF : -BLKW 128. ; RECEIVE BUFFER 
1088 007040 RBUF 2: -BLKW 128. 
1089 007440 RBUF 3: -BLKW 128. 
010040 RBUF 4: -BLKW 128. 
1091 010440 RBUFS: .BLKW 128. 
1092 011040 RBUF 6: -BLKW 128. 
1093 011440 RBUF 7: -BLKW 128. 
1094 012040 RBUF 8: -BLKW 128. 
1095 012440’ REND = 
1096 ; 
1097 
res ;DEFAULT PORT FUNCTIONS 
1100 012440 000000 NOPF : -WORD 0 ; NOP FUNCTION 
1101 012442 000000 -WORD O 
1102 012444 000000 -WORD 0 J 
= 012446 000000 -WORD 0 
: 
1105 012450 LSMA: WORD 1 ; LOAD AND START MICROADORESS FUNCTION 
1106 012452 177777 .WORD 177777 +; STARTING INTERNAL ADDRESS OF SELFTEST 
1107 012454 000000 -WORD O 
Er: 012456 000000 -WORD 0 
$ 
1110 012460 000002 RDDEFA WORD 2 ; READ DEFAULT PHYSICAL ADDRESS FUNCTION 
1111 012462 000000 -WORD O 
1112 012464 000000 -WORD O 
oes 012466 000000 .WORD O 
; 
1115 012470 000004 ROPHYA .WORD 4 ; READ PHYSICAL ADDRESS FUNCTION 
1116 012472 000000 -WORD OQ 
1117 012474 000000 WORD O 
att 012476 000000 WORD O 
$ 
1120 012500 000005 WTPHYA WORD 5 ; WRITE PHYSICAL ADDRESS 
1121 012502 000000 -WORD O ; PHYADR 
1122 012504 000000 WORD O 3; PHYADR 
er 0125 000000 -WORD O 3; PHYADR 
3 
1125 012510 000006 RDMULA: -WORD 6 ; READ MULTICAST ADDRESS LIST FUNCTION 
1126 012512 000310’ -WORD UDBB ; ADDRESS OF UNIBUS DATA BLOCK BASE 
1127 012514 00 -WORD 5000 3; MULTICAST ADDR TABLE LENGTH= 10(10) 
tT 012516 000000 WORD O 
: 
1130 012520 7 WTMULA: -WORD 7 ; WRITE MULTICAST ADDRESS LIST FUNCTION 
1131 012522 000310’ -WORD vUDBE ; ADDRESS OF UNIBUS DATA BLOCK BASE 
1132 012524 005000 -WORD 5000 ; MULTICAST ADOR TABLE LENGTH= 10(10) 
ota 012526 -WORD O 
; 
1135 012530 10 RORNGS : .WORD 10 ; READ RING FORMAT FUNCTION 
1136 012532 000310' -WORD UDBB 3; ADDRESS OF UNIBUS DATA BLOCK BASE 
1137 012534 000000 -WORD O 
tT 012536 000000 WORD C¢ 
3 
1140 012540 000011 WTRNGS: -WORD ii ; WRITE RING FORMAT FUNCTION 








nee eer mamaria, CC LLL LLL! LLL LLL LL 
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GLOBAL DATA SECTION 
1141 012542 000310° ‘WORD UDBB §; ADDRESS OF UNIBUS DATA BLOCK BASE 
1142 012544 000000 "WORD 0 
1143 012546 000000 "WORD 0 
2 
1145 012550 000012 RDCNT: .WORD 12 ; READ COUNTERS FUNCTION 
1146 012552 000310° "WORD UDBB §; ADDRESS OF UNIBUS DATA BLOCK BASE 
1147 012554 "WORD 0 
1148 012556 000070 "WORD 70 ; COUNTERS LIST LENGTH= 56(10) 
; 
1150 012560 000013 CLRCNT: .WORD 13 ; READ AND CLEAR COUNTERS FUNCTION 
1151 012562 000310° "WORD UDBB ; ADDRESS OF UNIBUS DATA BLOCK BASE 
1152 012564 000000 "WORD 0 
1153 012566 000070 "WORD 70 ; COUNTERS LIST LENGTH= 56(10) 
1155 012570 000014 RDMODE : -WORD 14 ; READ MODE FUNCTION 
1156 022572 000000 "WORD 0 
1157 012574 000000 "WORD 0 
1158 012576 000000 "WORD 0 
Hy 
1160 012600 000015 WTMODE : .WORD 15 ; WRITE MODE FUNCTION 
1161 012602 100104 "WORD 100104 ; PROM AND INTERNAL LOOPBACK MODE 
1162 ; GENERATE CRC 
1163 012604 000000 .WORD 0 
1164 012606 000000 “WORD 0 
1166 012610 000015 WTMOD1: .WORD 15 ; WRITE MODE FUNCTION 
1167 012612 104104 "WORD 104104 ; PROM AND INTERN LOOPBACK AND ENABL COLL TEST 
1168 ; GENERATE CRC 
1169 012614 000000 .WORD 0 
1170 012616 000000 “WORD 0 
1172 012620 000015 WIMOD2 : .WORD 15 ; WRITE MODE FUNCTION 
1173 012622 100114 "WORD 100114 ;PROM, INTERNAL LOOPBACK,NO GENERATE CRC 
1174 012624 000000 “WORD 0 
1175 012626 000000 “WORD 0 
1177 012630 000015 WTMOD3: .WORD 15 ; WRITE MODE FUNCTION 
1178 012632 100004 "WORD 100004 ; PROM.EXT.LOOPBACK, GENERATE CRC 
1179 012634 000000 “WORD 0 
1180 012636 000000 “WORD 0 
1182 012640 000015 WTMOD4 : WORD 15 ; WRITE MODE FUNCTION 
1183 012642 100014 "WORD 100014 ; PROM;EXT.LOOPBACK, NO GENERATE CRC 
1185 012644 000016 RDSTA: .WORD 16 ; READ STATUS FUNCTION 
1186 012646 000000 “WORD 0 
1187 012650 000000 “WORD 0 
1188 012652 000000 “WORD 0 
1190 012654 000017 CLRSTA: .WORD 17 ; READ AND CLEAR STATUS FUNCTION 
1191 012656 000000 “WORD 0 
1192 012660 000000 “WORD 0 
1198 012662 000000 “WORD 0 
1195 012664 000020 DMPMEM : .WORD 20 ; DUMP INTERNAL MEMORY FUNCTION 
1196 012666 000310’ "WORD UDBB §; ADDRESS OF UNIBUS DATA BLOCK BASE 
1197 012670 000000 "WORD 0 
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GLOBAL DATA SECTION 


012672 


012674 
012676 
012700 
012702 


012704 
012706 
012710 
012712 
012714 
012716 


012720 
012722 
012724 
012726 
012730 
012732 


012734 
012736 
012740 
012742 
012744 
012746 


012750 
012752 
012754 
012756 


012760 
012762 
012764 
012766 


012770 
012772 
012774 
012776 


013000 
013002 
013004 
013006 


013010 
013012 


eS 
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000000 


000021 
000310° 


002000 





LOMEM: 


er SL, TT 


: 
;DEFAULT RING FORMATS 


RFRMT: 


RFRMTX: 


RFRMTE: 


:DEFAULT RECEIVE DESCRIPTOR RINGS 


RDRBIA: 


; SEGB = RBUF 





SEQ 28 


LOAD INTERNAL MEMORY FUNCTION 
ADDRESS OF UNIBUS DATA BLOCK BA‘E 


TRANSMIT DESCRIPTOR RING ADDRESS 
TELEN = 6 
TRLEN = 4 
RECEIVE DESCRIPTOR RING ADDRESS 
RELEN = 6 
RRLEN = 4 


TRANSMIT DESCRIPTOR RING ADDRESS 
TELEN = 6 

TRLEN = 51 
RECEIVE 
RELEN = 6 
RRLEN = 50 


SCRIPTOR RING ADDRESS 


TRANSMIT DESCRIPTOR RING ADDRESS 
TELEN = 6 
TRLEN = 51 
RECEIVE DESCRIPTOR RING ADDRESS 
RELEN = 6 
RRLEN = 3C 


SLEN = 32 BYTES 
OWN = UNA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 





— . tin eles meal re er LS LT 
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GLOBAL AREAS 


GLOBAL DATA SECTION 


1255 013014 
1256 013016 


1293 013110 
1294 013112 
1295 013114 
1296 013116 


1298 013120 


000000 
000000 


; 
RORB2A: 


3 
RDRB3A: 


OWN = PORT ORIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT ORIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = UNA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = UNA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 


SLEN = 64 BYTES 


SLEN = 64 BYTES 
SEGB = RBUF2 
OWN = LUA 


SLEN = 64 BYTES 
SEGB = RBUFS 
OWN = LUA 


SLEN = 64 BYTES 
SEGB = RBUF 
OWN = PORT DRIVER 





SEQ 29 





Ce LD 
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GLOBAL DATA SECTICN 


1312 
1313 : 
1314 013150 000040 RORB4B: -WORD 32. 
1315 013152 006440’ .WORD £RBUF 
1316 013154 100000 .WORD 100000 
ous 013156 000000 .WORD 0O 
1319 013160 000040 .WORD 32. 
1320 013162 006440‘ -WORD RBUF 
1321 013164 100000 -WORD 100000 
a. 013166 000000 .WORD 0O 
1324 013170 000040 -WORD 32. 
1325 013172 006440’ .WORD RBUF 
1326 013174 100000 .WORD 100000 
1327 013176 000000 -WORD O 
1328 : 
1329 013200 WORD 32 
1330 013202 006440‘ WORD RBUF 
1331 013204 100000 WORD 100000 
rod 013206 000000 WORD 0 
1334 013210 000040 WORD 32 
1335 013212 006440’ WORD RBUF 
1336 013214 100000 WORD 100000 
ioe 013216 000000 WORD 0 

; 
1339 013220 000040 WORD 32. 
1340 013222 . WORD RBUF 
1341 013224 100000 .WORD 100000 
aa 013226 000000 » © 
1344 013230 000040 -WORD 32 
1345 013232 006440’ -WORD RBUF 
1346 013234 100000 100000 
oe 013236 000000 -WORD O 
1349 013240 000040 -WORD 32. 
1350 013242 006440’ -WORD RBUF 
1351 013244 100000 -WORD 100000 
1352 013246 DB «69 
135? ; 
1354 013250 000040 -WORD 32 
1355 013252 006440’ -WORD RBUF 
1356 013254 100000 -WORD 100000 
re 013256 900000 WORD 0 

$ 
1359 013260 000040 WORD 32 
1360 013262 006440’ WORD 
1361 013264 100000 WORD 100000 
poe 013266 000000 WORD 0 
1364 013270 WORD 32 
1365 013272 006440’ WORD RBUF 
1366 013274 100000 WORD 100000 
pod 013276 000000 WORD 0 


—_ el 


; SLEN = 32 BYTES 
; SEGB = RBUF 

; OWN = LUA 

‘ 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 





SEQ 30 


GLOBAL 


P= 


14 
1425 


AREAS 


013302 
013304 
013306 


013310 
013312 
013314 
013316 


013320 


013370 
013372 
013374 
013376 


013430 
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GLOBAL DATA SECTION 


aH 013300 


WORD 32. ; 
WORD RBUF ; 
"WORD 100000 ; 
. WORD 0 ; 
; 
.WORD 32. , 
WORD RBUF ; 
.WORD 100000 ; 
. WORD 0 ; 
.WORD 32. 
WORD RBUF ; 
"WORD 100000 ; 
. WORD 0 | 
.WORD 32 ; 
‘WORD RBUF ; 
“WORD 100000 ; 
"WORD 0 : 
.WORD 32 ; SLEN = 32 BYTES 
"WORD RBUF  ; SEGB = RBUF 
"WORD 100000 ; OWN = LUA 
WORD O 3 
; .WORD 32. ; 
-WORD RBUF 3 
“WORD 100000 ; 
-WORD O $ 
: .WORD 32. ; 
“WORD  RBUF 
-WORD 100000 ; 
“WORD 0 
é 
WORD 32. ; 
WORD RBUF $ 
“WORD 100000 ; 
“WORD 0 ; 
; .WORD 32. ; 
‘WORD RBUF_ ; 
"WORD 100000 ; 
“WORD 0 ; 
; 
RDRBSA: .WORD 32. ; SLEN = 32 BYTES 
“WORD RBUF  ; SEGB = RBUF 
“WORD 100000 ; OWN = LUA 
- WORD 0 3 
WORD 32 SLEN = 32 BYTES 


s ° 6 

.WORD RBUF ; SEGB = RBUF 
; OWN = LUA 
H 


-WORD 32. ; SLEN = 32 BYTES 





SEQ 31 


NS 





NS SS NE 
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GLOBAL DATA SECTION 


1 
1482 


013510 
013512 
013514 
013516 


013520 
013522 
013524 
013526 


012530 
013532 


013560 
013562 


RDRB4A: 


se ee 66 16 


SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 32 BYTES 
SEGB = RBUF 


OWN = PORT DRIVER 


SLEN = 16 BYTES 
SEGB = RBUF 
OWN = LUA 


SLEN = 22 BYTES CINCL. CRC) 


SEGB = RBUF2 
OWN = LUA 


SLEN = 16 BYTES 
SEGB = RBUF 


GLOBAL AREAS 
GLOBAL DATA SECTION 
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1483 013564 000000 .WORD 000000 ; OWN = PORT DRIVER 
1484 013566 000000 . WORD , 

1485 3 

1486 8 

1487 013570 000040 RDRBXX : .WORD 32. ; SLEN = 32 BYTES 
1488 013572 006440' .WORD RBUF ; SEGB = RBUF 
1489 013574 100000 -WORD 100000 ; OWN = LUA 
1490 013576 000000 WORD 0 : 

1492 013600 000040 .WORD 32. : 

1493 013602 006440' .WORD RBUF , 

1494 013604 100000 .WORD 100000 ; 

1495 013606 000000 WORD 0 : 

1497 013610 000040 WORD 32. ; 

1498 013612 006440’ .WORD RBUF : 

1499 013614 100000 .WORD 100000 ; 

1500 013616 000000 WORD 0 : 

1502 013620 000040 .WORD 32. ; 

1503 013622 006440’ .WORD RBUF ; 

1504 013624 100000 WORD 100000 ; 

1505 013626 000000 WORD ; 

1507 013630 000040 WORD 32. ; SLEN = 32 BYTES 
1508 013632 006440‘ .WORD RBUF ; SEGB = RBUF 
1509 013634 100000 WORD 100000 ; OWN = LUA 
1510 013636 000000 .WORD 0 ; 

1512 013640 000040 .WORD 32. ; 

1513 013642 006440’ .WORD RBUF : 

1514 013644 100000 .WORD 100000 ; 

1515 013646 000000 .WORD 0 : 

1517 013650 000040 WORD 32. ; 

1518 013652 006440’ .WORD RBUF ; 

1519 013654 100000 .WORD 100000 ; 

1520 013656 000000 WORD 0 ; 

1522 013660 000040 WORD 32. ; 

1523 013662 006440’ WORD RBUF i 

1524 013664 100000 .WORD 100000 ; 

1525 013666 000000 .WORD 0 ; 

1527 013670 000040 WORD 32. ; 

1528 013672 006440’ .WORD RBUF ‘ 

1529 013674 100000 WORD 100000 ; 

1530 013676 000000 WORD 0 ; 

1532 013700 000040 WORD 32. ; 

1533 013702 006440’ .WORD RBUF : 

1534 013704 100000 WORD 100000 ; 

1335 013706 000000 WORD 0 ; 

1537 013710 000040 WORD 32. ; SLEN = 32 BYTES 
1538 013712 006440’ .WORD RBUF ; SEGB = RBUF 
1539 013714 100000 .WORD 100000 ; OWN = LUA 


GLOBAL AREAS MACRO Y05.02 Friday 12-Jul-85 09:33 Page 15-9 SEQ 34 
GLOB4L DATA SECTION 
ory 013716 000000 -WORD 0 ; 
1542 013720 000040 -WORD 32. : 
1543 013722 006440‘ -WORD RBUF ; 
1544 013724 100000 -WORD 100000 ; 
ooo 013726 000000 .WORD 0 i 
1547 013730 000040 -WORD 32. ; 
1548 013732 006440' .WORD RBUF i 
1549 013734 .00000 .WORD 100000 ; 
oy 013736 000000 .WORD 0 ; 
1552 013740 000040 .WORD 32. i 
1553 013742 006440’ -WORD RBUF i 
1554 013744 100000 -WORD 100000 ; 
cane 013746 000000 .WORD 0 . 
1557 013750 000040 -WORD 32. i 
1558 013752 006440’ . WORD ; 
1559 013754 100000 -WORD 100000 ; 
ry 013756 000000 . WORD : 
1562 013760 WORD 32 ; S'-N = 32 BYTES 
1563 013762 006440' WORD RBUF ; SELB = RBUF 
1564 013764 100000 WORD 100000 ; OWN = LUA 
oH 013766 900000 WORD : 
1567 013770 000040 -WORD 32. : 
1568 013772 006440' .WORD RBUF ‘ 
1569 013774 100000 -WORD 100000 ; 
rey 013776 000000 -WORD 0 j 
1572 014000 000040 WORD 32 ; 
1573 014002 006440’ -WORD RBUF ; 
1574 014004 100000 D 100000 ; 
pak 014006 000000 WORD 0 ; 
1577 014010 000040 -WORD ; 
1578 014012 006440’ RBUF : 
1579 014014 100000 WORD 100000 ; 
ery 014016 000000 WORD 0 : 
1582 014020 000040 WORD 32 i 
1583 014022 006440' WORD RBUF ; 
1584 014024 100000 WORD 100000 ; 
— 014026 000000 WORD i 
1587 014030 000040 -WORD 32. ; SLEN = 32 BYTES 
1588 014032 006440’ -WORD RBUF ; SESB = RBUF 
1589 014034 100000 -WORD 100000 ; OWN = DELUA 
oy 014036 000000 -WORD 0 ; 
1592 014040 000040 -WORD 32. ;SLEN = 32 BYTES 
1593 014042 006440’ -WORD RBUF ; SEGB = RBUF 
1594 014044 100000 -WORD 100000 ; OWN = LUA 
eo 014046 000000 -WORD 0 ; 


real LL LS LLL 
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GLOBAL DATA SECTION 

1597 014050 000040 .WORD 32. ; 

1598 014052 006440’ .WORD RBUF =; 

1599 014054 100000 -WORD 100000 ; 

1600 014056 000000 .WORD 0 ; 

1602 014060 WORD 32 

1603 014062 006440’ WORD BUF 

1604 914064 100000 WORD 100000 ; 

1605 014066 000000 WORD 

1607 014070 000040 .WORD 32. 

1608 014072 006440' .WORD RBUF ss; 

1609 014074 100000 .WORD 100000 ; 

1610 014076 000000 .WORD 0 

1612 014100 000040 .WORD 32. ; SLEN = 32 BYTES 

1613 014102 006440' .WORD RBUF =; SEGB = RBUF 

1614 014104 100000 -WORE 100000 ; OWN = LUA 

1615 014106 000000 WORD 0 ; 

1617 014110 000040 .WORD 32. 

1618 014112 006440’ .WORD RBUF ; 

1619 014114 100000 .WORD 100000 ; 

1620 014116 000000 .WORD 0 

1622 014120 000040 .WORD 32. : 

1623 014122 006440’ .WORD RBUF ; 

1624 014124 100000 .WORD 100000 ; 

1625 014126 000000 .WORD 0 5 

1627 014130 000040 .WORD 32. ; 

1628 014132 006440’ .WORD RBUF ; 

1629 014134 100000 .WORD 100000 ; 

1630 014136 000000 word =O i : 

1632 014140 000040 .WORD 32. : 

1633 014142 006440’ .WORD RBUF  ; 

1634 014144 100000 .WORD 100000 ; 

1635 014146 000000 .WORD 0 ; 

1637 014150 000040 .WORD 32. ; SLEN = 32 BYTES 

1638 014152 006440’ .WORD RBUF ; SEGB = RBUF 

1639 014154 100000 WORD 100000 ; OWN = LUA 

1640 014156 000000 WORD 0 ; 

1642 014160 000040 WORD 32 i 

1643 014162 (06440' .WORD RBUF ; 

1644 014164 100000 WORD 100000 ; 

1645 014166 06:.0000 WORD 0 : 

1647 014170 000040 .WORD 32. 

1648 014172 006440' .WORD RBUF ; 

1649 014174 100000 .WORD 100000 ; 

1650 014176 000000 .WORD 0 ; 

1652 014200 000040 .WORD 32. 

1653 014202 006440' .WORD RBUF- ; 


el cei LD 
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GLOBAL DATA SECTION 

1654 014204 100000 .WORD 100000 ; 

1655 014206 000000 .WORD 0 ; 

1657 014210 000040 .WORD 32. 

1658 014212 006440' .WORD RBUF; 

1659 014214 100000 .WORD 100000 ; 

1660 014216 000000 .WORD 0 ; 

1662 014220 000040 .WORD 32. ; SLEN = 32 BYTES 

1663 014222 006440’ .WORD RBUF  ; SEGB = RBUF 

1664 014224 100000 -WORD 100000 ; OWN = LUA 

1665 014226 000000 .WORD 0 

1667 014230 000040 .WORD 32. ; 

1668 014232 006440’ .WORD RBUF-; 

1669 014234 100000 .WORD 100000 ; 

1670 014236 000000 .WORD 0 

1672 014240 000040 .WORD 32. ; 

1673 014242 006440' .WORD RBUF  ; 

1674 014244 100000 .WORD 100000 ; 

1675 014246 000000 . WORD 

1677 014250 000040 .WORD 32. i 

1678 014252 006440' .WORD RBUF ; 

1679 014254 100000 .WORD 100000 ; 

1680 014256 000000 .WORD 0 ; 

1682 014260 000040 .WORD 32. ; 

1683 014262 006440’ .WORD RBUF ; 

1684 014264 100000 .WORD 100000 ; 

1685 014266 000000 .WORD 0 : 

1686 

1687 

1688 014270 000040 .WORD 32. ; SLEN = 32 BYTES 

1689 014272 006440' .WORD RBUF  ; SEGB = RBUF 

1690 014274 100000 .WORD 100000 ; OWN = LUA 

1691 014276 000000 .WORD 0 ; 

1693 014300 000040 WORD ; 

1694 014302 006440: .WORD RBUF ; 

1695 014304 100000 WORD 100000 ; 

1696 014306 000000 WORD 0 ; 

1698 014310 000040 . WORD ; 

1699 014312 006440: .WORD RBUF ; 

1700 014314 - 100000 .WORD 100000 ; 

1701 014316 000000 .WORD 0 ; 

1703 014320 000046 .WORD 32. : 

1704 014322 006440' .WORD RBUF  ; 

1705 014324 100000 .WORD 100000 ; 

1706 014326 000000 .WORD 0 

1708 014330 000040 .WORD 32. i 

1709 014332 006440' .WORD RBUF~; 

1710 014334 100000 .WORD 100000 ; 


ee 


GLOBAL AREAS 
GLOBAL DATA SECTION 


1760 
1761 
1762 
1763 


1764 
1765 
7 


1766 
1767 


014336 


014370 
014372 
014374 
014376 


014446 


014450 
014452 
014454 
014456 


014460 





- WORD 


SLEN = 32 BYTES 
SEGB = RBUF 
OWN = LUA 


OWN = PORT DRIVER 


OWN = PORT DRIVER 


“DEFAULT TRANSMIT DESCRIPTOR RINGS 


6 
TORB1A: 


3 
TORBIB: 


26. 
TBUF 
—— 


SLEN = * BYTES 


; 
; SEGB = TBUF 


OWN = UNA ;STP,ENP 


SLEN = 24 BYTES 
SEGB = TBUF 

OWN = PORT DRIVER 
SLEN = 24 BYTES 
SEGB = TBUF 

OWN = PORT DRIVER 
SLEN = 24 BYTES 
SEGB = TBUF 


B 
; OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = UNA ;STP,ENP 


SLEN = 32 BYTES 
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SEQ 37 


mmm et LD 
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GLOBAL AREAS 
GLOBAL DATA SECTION 


— 


1768 014462 
1769 014464 
oa 014466 


1771 

1772 014470 
1773 014472 
1774 014474 
pat 014476 


1776 
1777 014500 
1778 014502 
1779 014504 
1780 014506 
781 


1 

1782 014510 
1783 014510 
1784 0145i2 
1785 014514 
pe 014516 


178 
1788 014520 
1789 014522 
1790 014524 
1791 014526 
1792 


1793 014530 
1794 014532 
1795 014534 
1796 014536 
1797 

1798 014540 


1807 014556 


1808 

1809 014560 
1810 014562 
1811 014564 
ooo. 014566 


181 

1814 014570 
1815 014572 
1816 014574 
re 014576 


002436 ' 


é 
TORBIC: 


3 
TORB2A: 





SEGB = TBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER 


SLEN = 34 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 34 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER; STP;ENP 


SLEN = 40 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 40 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER; STP; ENP 


SLEN = 14 BYTES 
SEGB = TBUF 
OWN = DELUA ;STP 


SLEN = 18 BYTES 
SEGB = TBUF 
OWN = DELUA ;STP 


SLEN = 18 BYTES 
SEGB = TBUF 
OWN = PRT DRIVER 


SLEN = 14 BYTES 
SEGB = TBUF 
OWN = DELUA ;STP 


SEQ 38 


1625 014610 
1826 914612 
1627 014614 
1828 014616 
1829 

1830 014620 
1831 014622 
1832 014624 
1833 014626 
1834 

1835 014630 


1850 

1851 014660 
1852 014662 
1853 014664 
et 014666 


185 

1856 014670 
1857 014672 
1858 014674 
1859 014676 
1860 

1661 


1862 
1863 014700 


1867 

1868 014710 
1869 014712 
1870 014714 
pad. 014716 


1872 

1873 014720 
1874 014722 
1875 014724 
1876 014726 
1877 

1878 014730 
1879 014732 
1880 014734 
1881 014736 





ee TE 


GLOBAL AREAS 
GLOBAL DATA SECTION 
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000022 
002436' 
100400 
000000 


TORB2B : 


; 
TORBSA: 


SLEN = 18 BYTES 
SEGB = TBUF 
OWN = DELUA ;ENP 


SLEN = 16 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER 


SLEN = 16 BYTES 
SEGB = TBUF 
OWN = PORT ORIVER 


SLEN = 20 BYTES 
SEGB = TBUF 
OWN = UNA;STP 


SLEN = 20 BYTES 
SEGB = TBUF 
OWN = UNA; ENP 


SLEN = 20 BYTES 
SEGB = TBUF 
OWN = UNA;STP 


SLEN = 20 BYTES 
SEGB = TBUF 
OWN = UNA; ENP 


SLEN = 42 BYTES 
SEGB = TBUF 
OWN = LUA ;STP,ENP 


SLEN = 42 BYTES 
SEGB = TBUF 


3; OWN = LUA 


SLEN = 42 BYTES 
SEGB = TBUFS 
OWN = LUA ;ENP 


SLEN = 124 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER 





SEQ 39 





GLOBAL AREAS 
GLOBAL DATA SECTION 


014740 
014742 
014744 
014746 


014750 
014752 
014754 
014756 


014760 
014762 
014764 
014766 


014770 
014772 
014774 
014776 


015000 
015002 
015004 
015006 


015010 
015012 
015014 
015016 


015020 
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000032 
002436‘ 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436’ 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436‘ 
101400 
000000 


000032 
002436‘ 
101400 
000000 


000032 
002436’ 
101400 
000000 


: 
TORB XX : 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA ;STP ;ENP 


~ me 


GLOBAL AREAS 
GLOBAL DATA SECTION 


1995 


015070 
015072 
015074 
015076 


015100 
015102 
015104 
015106 


015110 
025112 
015114 
025116 


015120 
015122 
015124 
015126 


015130 
015132 
015134 
015136 


015140 
015142 
015144 
015146 


015150 
015152 
015154 
015156 


015160 
015162 
015164 
015166 


015170 
015172 
015174 
015176 


015220 
015222 
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000032 
002436‘ 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436’ 
101400 
000000 


000032 
002436 ' 





as 
7A a 


SLEN = 32 BYTES 
; SEGB = TBUF 
; OWN = LUA ;STP ;ENP 


; SLEN = 32 BYTES 
; SEGB = TBUF 
; OWN = LUA ;STP ;ENP 


; SLEN = 32 BYTES 
; SEGB = TBUF 
; OWN = LUA ;STP ;ENP 


; SLEN = 32 BYTES 
; SEGB = TBUF 
; OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
; OWN = LUA ;STP ;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


; SLEN = 32 BYTES 
; SEGB = TBUF 





SEQ 41 


- - a 
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GLOBAL AREAS 
GLOBAL DATA SECTION 


2051 
2cS2 


015224 
015226 


015230 
15232 
015234 
015236 


015240 
015242 
015244 
025246 


015250 
015252 
015254 
015256 


015260 
015262 
015264 
015266 


015270 
015272 
015274 
015276 


015300 
015302 
015304 
015306 


015310 
015312 
015314 
015316 


015320 
015322 
015324 
015326 


015330 
015332 
015334 
015336 


015340 
015342 
015344 
015346 


015350 
015352 
015354 
015356 


101400 
000000 


000032 
002436’ 
101400 


000032 
002436’ 
101400 
000000 


000032 
002436‘ 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436’ 
101400 
000000 


000032 
002436' 
101400 
000000 


000032 
002436’ 
101400 
000090 


000032 
002436‘ 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436' 
101400 
000000 





ae 


OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = LUA;STP;ENP 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 





SEQ 42 


i 
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GLOBAL AREAS 


GLOBAL DATA SECTION 


2053 

2054 015360 
2055 015362 
2056 015364 
2057 015366 


2059 015370 
2060 015372 
2061 015374 
2062 015376 


2108 
2109 015510 


000032 
002436' 
101400 
000000 





a 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP; ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEG® = TBUF 
OWN = LUA;STP;ENP 


SLEN =32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 


— ae 





SEQ 43 


os 


ee I a eR A 
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GLOBAL AREAS 
GLOBAL DATA SECTION 


2110 015512 


2111 


015514 


2112 015516 


2 
2165 
2166 


015570 
015572 
015574 
015576 


30 
015632 


002436 ' 
101400 
000000 


000032 
002436 ' 
101400 
000000 


000032 
002436 ' 
101400 
000000 





Py 
TORB4A: 


al 


; 
sDEFAULT DATA FOR TEST1i1 


CRCH: 


;DEFAULT UDBB FOR TEST11 


UDB1i0A: 


-WORD 0 
WORD 2000 
-WORD RBUF 
-WORD 0 
-WORD 0 
.WORD 10 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = LUA;STP;ENP 


SLEN = 32 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER; STP; ENP 


SLEN = 14 BYTES 
SEGB = TBUF 
OWN = LUA;STP 


SLEN = 14 BYTES 
SEGB = TBUF 
OWN = LUA; ENP 


SLEN = 14 BYTES 
SEGB = TBUF 
OWN = PORT DRIVER;STP,ENP 


CRC STORAGE 


FLEN = 1024 WORDS 
HDBB = RBUF 





SEQ 44 


LLL LLL LLL 





I eT 
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GLOBAL DATA SECTION 

oe. 3;ROM ADDRESS TABLE FOR TEST1i1 

2169 015634 MEMLOA: 

2170 015634 000000 .WORD 0 ; ADDRESS OF ROH 1ST 1K 

2171 015636 002000 -WORD 2000 ; SECOND 1K 

2172 015640 004000 .WORD 4000 a re. 

2173 015642 006000 .WORD 6000 

2174 015644 010000 WORD 10000 

2175 015646 012000 WORD 12000 

2176 015650 014000 WORD 14000 

2177 015652 016000 WORD 16000 

2178 015654 020000 WORD 20000 

2179 015656 022000 WORD 22006 

2180 015660 024000 WORD 24000 

2181 015662 026000 WORD 26000 

2182 015664 030000 WORD 30000 

2183 015666 032000 WORD 32000 

2184 015670 034000 WORD 34000 

2185 015672 036000 WORD 36000 

2186 

2187 

te ;DEFAULT UDBB FOR TSTi2 

2190 015674 004000 UDB11A: -WORD 4000 ; FLEN = 1024. WORDS 

2191 015676 000000 -WORD O ; HDBB = RBUF OR TBUF (LOADED BY TEST) 

2192 015700 000000 -WORD 0 

2193 015702 000000 -WORD 0 ; IOBB (LOADED BY TEST) 

oooe 015704 000000 -WORD 0 ; IDBB (Upper addr bits) loaded by test 

rote ;WCS DOWNLINE LOAD ADDRESS TABLE FOR TESTi2 

— 015706 014000 MEML1A: .WORD 14000 ; TOP 1K SECTION OF MEMORY 

oy sINTERNAL RAM MEMORY ADDRESS TABLE FOR TESTi2 

pore 015710 000146 -WORD END13A-MEM1I3A ; WORD SIZE OF MEM13A 

2204 015712 062000 MEM13A: .WORD 062000 ; FIRST 1K BLOCK OF INTERNAL RAM MEMORY 

2205 015714 066000 -WORD 066000 

2206 015716 072000 -WORD 072000 

2207 015720 076000 WORD 076000 

2208 015722 102000 -WORD 102000 

2209 015724 106000 -WORD 106000 

2210 015726 112000 D 112000 

2211 015730 116000 WORD 116000 

2212 015732 122000 WORD 122000 

2213 015734 126000 WORD 126000 

2214 015736 132000 WORD 132000 

2215 015740 136000 WORD 136000 

2216 015742 142000 WORD 142000 

2217 015744 146000 WORD 146000 

2218 015746 152000 WORD 152000 

2219 015750 156000 WORD 156000 

2220 015752 162000 WORD 162000 

2221 015754 166000 -WORD 166000 

2222 015756 172000 .WORD 172000 

2223 015760 176000 .WORD 176000 


- 


ee re ll 
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GLOBAL AREAS 
GLOBAL DATA SECTION 


a 015762 


002000 


052525 
052525 





. WORD 


ENDISA = . 


;PHYSICAL ADDRESSES FOR 
ADR21: . WORD 


ADR21C: . WORD 


sMULTICAST ADDRESS LIST 
MULTL: . WORD 


——— ne 


TEST 20 


;FROM HERE ON EXT ADDR BIT WILL BE 
;SET IN UDBB+4 


125252 ; DEFAULT PHYSICAL ADDRESS 


125252 
125252 


52524 
$2525 
52525 
FOR TEST 21 


; COMPLEMENTED PHYSICAL ADDRESS 


125253 ; MULTICAST ADDRESS LIST 


125252 
125252 
125253 
052525 
125252 
125253 
125252 
052525 
125253 





SEQ 46 


eee ml ee LL LLL LLL LLL LL 
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GLOBAL 


AREAS 


GLOBAL DATA SECTION 


016172 


177777 
052525 
125253 
000000 


MULTLC: 


;DEFAULT EXPECTED DATA 
TORI4A: 


177777 
052525 
125253 
000000 


26. 
TBUF 
021400 


; COMPLIMENTED ADDRESS LIST 


; EXPECTED TORB FOR 
; TEST13,17,20-23,25,26 
; MTCH,STP,ENP 


SEQ 47 


ml LL 
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GLOBAL DATA SECTION 
2338 016272 000000 -WORD 0 i 
2339 016274 000040 TORISA: -WORD 32. ; EXPECTED TORB FOR 
2340 016276 002436’ -WORD TBUF ; TESTS 14,15 
2341 016300 021400 WORD 021400 ; MTCH,STP,ENP 
2342 016302 000000 -WORD 0 
2343 016304 000016 TOR18A: -WORD 14. ; FIRST TORB FOR TEST18 
2344 016306 002436’ WORD TBUF ; 
2345 016310 041400 WORD 041400 ; ERR,STP,ENP 
2346 016312 100000 .WORD 100000 ; BUFL ERROR 
2347 016314 000022 TDR186 : -WORD 18. ; SECOND TORB FOR TEST18& 
2348 016316 002436' WORD TBUF ; 
2349 016320 041400 WORD 041400 ; ERR,STP,ENP 
2350 016322 100000 .WORD 100000 ; BUFL ERROR 
2351 016324 000016 TDR2O0A: .WORD 14. ; FIRST TORB FOR TEST19 
2352 016326 002436’ .WORD TBUF 
2353 016330 001000 -WORD 001000 ; STP 
2354 016332 000000 -WORD 0 
2355 016334 000016 TOR2OB : WORD 14. ; SECOND TORB FOR TEST19 
2356 016336 002436' .WORD TBUF 
2357 016340 020400 -WORD 20400 ; MTCH,ENP 
2358 016342 000000 .WORD 0 
2359 016344 000032 TOR21X: -WORD 26. ; EXPECTED TORB FOR 
2360 916346 002436’ -WORD TBUF ; TESTS 20,21 
2361 016350 001400 -WORD 001400 ; STP,ENP 
2362 016352 000000 -WORD 0 | 
2363 016354 000042 TOR24A: -WORD 34. ;EXPECTED TORS FOR 
2364 016356 002436' .WORD TBUF ; TEST 24, 1ST PASS 
2365 016360 041400 -WORD 041400 ;BUFL,STP,ENP 
2366 016362 100000 -WORD 100000 ; 
2367 016364 000050 TOR246 : WORD 40. sEXPECTED TORB FOR 
2368 016366 002436' -WORD TBUF ; TEST 24, 2ND PASS 
2369 016370 041400 -WORD 041400 ;BUFL,STP.ENP 
rosy 016372 100000 -WORD 100000 ; 
2372 016374 000040 RDR14B: -WORD 32. ;EXPECTED RORB 
2373 016376 006440' . WORD ; FOR TEST 14 
2374 016400 001400 WORD 001400 ; STP,ENP 
2375 016402 000040 -WORD 32. 3 
2376 016404 000040 RORISA: -WORD 32. ; EXPECTED RDORB FR 
2377 016406 006440' -WORD RBUF ; TESTS 15 
2378 016410 065400 -WORD 065400 ; ERRS,CRC,FRM,STP,ENP 
2379 016412 000040 . WORD ° 
2380 016414 000040 RDR1i7A: -WORD 32. ; FIRST RDORB FOR TEST17 
2381 016416 006440’ WORD RBUF ; 
2382 016420 001400 -WORD 001400 ; ERRS,STP,ENP 
2383 016422 020056 -WORD 020036 ; NCHN 
2384 016424 000040 RDR1 7B: -WORD 32. ; SECOND RDRB FOR TEST17 
2385 016426 006440' -WORD RBUF 
2386 016430 100000 -WORD 100000 ; OWN = DELUA 
2387 016432 000000 -WORD 0 
2388 016434 000020 RDR2OA: -WORD 16. ; FIRST RDRB FOR TEST19 
2389 016436 006440’ -WORD RBUF 
2390 016440 001000 -WORD 001000 ; STP 
2391 016442 000000 -WORD 0 
2392 016444 000026 RDR2OB : -WORD 22. ; SECOND RDORB FOR TEST19 
2393 016446 007040’ -WORD RBUF2 
2394 016450 000400 -WORD 000400 ; ENP 


SEQ 49 


AL AREAS 


2395 016452 
2396 016454 
2397 016456 
2398 016460 
2399 016462 


2 

2403 016464 
2404 016466 
2405 016470 
2406 016472 
2407 016474 
2408 016476 
2409 016500 
2410 016502 
2411 016504 
2412 016506 
2413 016510 
2414 016512 
2415 


2416 

2417 016514 
2418 016516 
2419 016520 
2420 016522 
2421 016524 
2422 016526 
2423 016530 


2445 016574 
2446 016576 


a 016600 


244 
2450 016602 
2451 016604 
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GLOBAL DATA SECTION 


000040 


000040 
006440’ 


001400 
000036 


100114 
120104 
00 


RDR2OC: 


SWADOR : 
; GLOBAL 


XTORBG : 


BYTCNT: 
DOCRC: 


. WORD 
. WORD 
. WORD 
. WORD 
. WORD 
WORD 100114 
WORD 120104 
WORD 100000 
WORD 104 
WORD 040104 
-WORD 110104 
-WORD 2 
. WORD 
. WORD 
. WORD 
. WORD 
-WORD 21040 
DATA AND FLAGS 
-WORDB 0 
-WORD OQ 
-WORD 0 
-WORD 9O 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 9O 
-WORD 0 
-WORD 0 
-WORD 0 
-WORD 0 
. WORD 
. WORD 
. WORD 
. WORD 
. WORD 
. WORD 
. WORD 
. WORD 
. WORD 


ee ee Ge Gs 


oo oc ooooco°od 


2 TEST13,20-23,25-26 


UF 
1400 ; STP, ENP 
30. 


MODE = PROM,OTCR, INTL 
MODE = PROM,ORDC, INTL 
MODE = PROM 
INTL LOOPBACK ONLY 
MODE = ENAL, INTL 
MODE = PROM, TPAD, INTL 
UDBB FOR TEST26 

; 


; 
i 
; 
SWITCH PACK ADDRESS 


PCSRO AT TIME OF ERROR 


ROR 
EXPECTED RORB+O AT TIME OF ERROR 
EXPECTED RDRB+2 AT TIME OF ERROR 
EXPECTED RORB+4 AT TIME OF ERROR 
EXPECTED RORB+6 AT TIME OF ERROR 


TORB+6 AT TIME OF ERROR 

EXPECTED TDRB+O AT TIME OF ERROR 
EXPECTED TORB+2 AT TIME OF ERROR 
EXPECTED TORB+4 AT TIME OF ERROR 
EXPECTED TORB+6 AT TIME OF ERROR 


NUMBER OF BYTES/PACKET 
CRC REQUIREMENT FOR SUBROUTINES 


0 = NO CRC 

1 = APPEND CRC 

ACTUAL DATA AT TIME OF ERROR 
EXPECTED DATA AT TIME OF ERROR 
ACTUAL CRC VALUE AT TIME OF ERROR 


; EXPECTED CRC VALUE AT TIME OF ERROR 


; SELF TEST ERROR CODE SHIFTED RIGHT 


CLOCK TICKS 
NXM TIMEOUT FLAG 





ae 
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GLOBAL AREAS 


GLOBAL DATA SECTION 


2452 016606 
2453 016610 
2454 016612 


PATRNL: 


ERRTYP:: 
ERRNBR: : 
ERRMSG: : 
ERRBLK: : 


ERRTBL 


oooo 


EXT ADDRESS BITS FLAG 
FLAG 


DEFAULT STORAGE FOR REPLY TO 
MANUAL INTERVENTION REQUEST 


SAO_SA1 TEST PATTERN 


LSERRTBL:: 





SEQ 50 








Ne 
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GLOBAL TEXT SECTION 
2473 .SBTTL GLOBAL TEXT SECTION 
2474 
2475 ;o* 
2476 ; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
2477 ; MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
2478 ; MORE THAN ONE TEST. 
2479 gee 
2480 
2481 $ 
eee ; NAMES OF DEVICES SUPPORTED BY PROGRAM 
; 
2484 016660 DEVTYP <DELUA> 
016660 LSDVTYP:: 
016660 104 1c5 114 -ASCIZ S#DELUAS 
016663 125 101 000 
-EVEN 
2485 
2486 
os i ; TEST DESCRIPTION 
2 ; 
2489 016666 DESCRIPT <DELUA - PDP11 FUNCTIONAL DIAGNOSTIC dtd 08-JUL-85> 
016666 L$DESC:: 


104 105 114 "" ASCIZ /DELUA - POP11 FUNCT 


016666 
IONAL DIAGNOSTIC 
dtd 08-JUL -85/ 


2490 -EVEN 
2491 





— 





GLOBAL AREAS 
GLOBAL TEXT SECTION 


— 


0 
2499 
0 


2500 


2501 
0 


2502 


017177 


MACRO YO5S.02 


+’ 





Fridey 12-Jul-85 09:33 Page 15 


’ 
; FORMAT STATEMENTS USED IN PRINT CALLS 
; 


; 
FRMOO1: .ASCIZ /sNSAPCSRS#D1SA DOES NOT EXIST/ 


FRMOO2: .ASCIZ /sNSA EXPECTED DATA = SO6SN#A ACTUAL DATA = #06/ 
FRMOO3: .ASCIZ /sNSA PCSRO = SO6SNSA PCSR1i = 806/ - 

FRMOO4: .ASCIZ /sNSA SELF TEST ERROR CODE = #02/ 

FRMOOS: .ASCIZ /sSNSA EXPECTED TORB+O = SO6SNSA ACTUAL TORB-O = 


806/ 


LLL LD, LLL LLL LLL 





ES TD 
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GLOBAL TEXT SECTION 


017202 103 124 105 
017205 104 040 124 
0172190 104 122 102 
017213 053 060 040 
017216 075 040 045 
017221 117 066 045 
017224 116 045 101 
017227 040 101 103 
017232 124 125 101 
017235 114 040 124 
017240 104 122 102 
017243 053 060 040 
017246 075 040 040 
017251 040 045 117 
017254 066 000 
2503 017256 045 116 045 FRMOO6: .ASCIZ /SNSA EXPECTED TORB+2 = SO6SNSA ACTUAL TORB+2 = #06/ 

017261 101 040 105 
017264 130 120 105 
017267 103 124 105 
017272 104 040 124 
017275 104 122 102 
017300 053 062 040 
017303 075 040 045 
017306 117 066 045 
017311 116 045 101 
017314 040 101 103 
017317 124 125 101 
017322 114 040 124 


2504 017343 045 116 045 FRMOO7: .ASCIZ /SNSA EXPECTED TDORB+4 = SO68NSA ACTUAL TDRB+4 = 06/ 


2505 017430 045 116 045 FRMOO8: .ASCIZ /sNSA EXPECTED TORB+6 = sO6%NSA ACTUAL TDRB+6 = #06/ 


017447 104 122 102 


GLOBAL AREAS 
GLOBAL TEXT SECTION 


2506 


2507 


2508 


017452 
017455 
017460 
017463 
017466 
017471 
017474 








aan 
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053 
075 


040 
045 


FRMOO9: .ASCIZ /sNSA EXPECTED RDRB+O = SO06SNSA ACTUAL RDRB+O = 


FRMO1LO: .ASCIZ /SNSA EXPECTED RDRB+2 = S068NSA ACTUAL RDRB+2 = 


FRMO11: .ASCIZ /sNSA EXPECTED RDRB+4 = SO068NSA ACTUAL RORB+4 = 


#06/ 


s06/ 


s06/ 





SEQ 54 





GLOBAL AREAS 
GLOBAL TEXT SECTION 


2509 


2510 


2511 


017722 
017725 
017720 
017733 
017736 
017741 
017744 
017747 
017752 
017754 
017757 


020167 
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FRMO13: 


FRMO14: 


SS 


-ASCIZ /#NSA EXPECTED CRC = SO68NSA 


-ASCIZ /sNSA ACTUAL CRC 


= SO6SNSA 


FRMO12: .ASCIZ /sNSA EXPECTED RORB+6 = SO68NSA ACTUAL RDRB+6 = 


#06/ 


s06/ 


s06/ 





SEQ 55 


eee 





TD 


GLOBAL AREAS MACRO YO5.02 Friday 12-Jul-85 09:33 Page 15-4 SEQ 56 
GLOBAL TEXT SECTION 


020172 040 045 117 
2512 020177 045 116 045 FRMO1S: .ASCIZ /sNST/ 
2513 020204 045 116 Ht: FRMO16: .ASCIZ /sNSAROM MICROCODE VERSION (DECIMAL): sD2/ 


2514 pees bed 045 116 045 FRMO17: .ASCIZ /sSNSASWITCH PACK = #06/ 


2515 020303 045 116 045 FRMO18: .ASCIZ /#NSAPORT STATUS WORD i: #06/ 


2516 020337 045 116 045 FRMO19: .ASCIZ /sNSA WORD 2: #06/ 


2517 020373 045 116 045 FRMO20: .ASCIZ /sNSA WORD 3: #06/ 


020426 
2518 029427 045 116 045 FRMO21: .ASCIZ /sNSA WORD 4: #06/ 


TS A NA 


GLOBAL AREAS 
GLOBAL TEXT SECTION 


2519 


2520 


2521 
2522 


2523 





EN 
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FRMO22: 


FRMO23: 


MSG1: 


.ASCIZ /#SNSA EXPECTED UDBB+4 = > 0 SNA ACTUAL UDBB+4 = #06/ 


-ASCIZ /sNSA PCSRO = #06/ 


ASCII /SNSAFAILURE TO INSTALL EXT. LOOPBACK CONN. MAY RESULT IN/ 


.ASCIZ /SNSANETWORK FAULTSSN/ 





SEQ 57 





— nae 





A Te 
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GLOBAL TEXT SECTION 


00 
2524 020705 111 116 = MNMSG1: .ASCIZ /INSTALL LOOPBACK CONNECTOR, THEN PRESS <CR> TO CONTINUE/ 


2525 020775 105 130 ne SKIP: -ASCIZ /EXT.LOOPBACK TEST- EXT MODE NOT SELECTED - SKIP / 


2526 021056 105 130 +e SKIP26: .ASCIZ /EXT.LOOPBACK TEST - MUST BE ATTENDED MODE - SKIP / 


2527 





SEQ 58 


eee, 


GLOBAL AREAS 


2535 
2536 021202 


2537 021246 


2538 
2539 021310 


2540 021354 


MACRO YO5.02 Friday 12-Jul-85 09:33 Page 15-7 
GLOBAL TEXT SECTION 


EVEN 





SEQ 59 


5 6 56 9h 5 ph hg 0 ph uh uh kk kl 0 ul su wu uh kh kk kk hk hk ahh wh gs ehh ed as ed eed ws wed Bed ood 


MESSAGES USED ONLY IN THE INITIALIZE ROUTINE. 


5 3 5 06 06 6 6 5 wh ou ws 0 pk uh 0 vu kh kv 0 vu 0 wk sn sh ok vk ek sh a ok ek se ok a wk ei nk in whe sh ed mo oe 
.ASCIZ/CANNOT CONTINUE - NEED LINE CLOCK/ 


NOCLK: 


M68FLD: .ASCII/CANNOT CONTINUE - NO DNI AFTER RESET/ 


DEVUNI: .ASCII/CANNOT CONTINUE - NO ONI AFTER RESET/ 


-ASCIZ/ 


-ASCIZ/ 


MICROPROCESSOR SUBSYSTEM FAULT/ 


DEVICE OR UNIBUS ERROR/ 


GLOBAL AREAS MACRO YOS.02 Friday 12-Jul-85 09:33 Page 15-8 SEQ 60 
GLOBAL TEXT SECTION 


2541 
2542 po gy 103 101 ro NIUNIB: .ASCII/CANNOT CONTINUE - NO ONI AFTER RESET/ 


2543 021452 040 040 040 -ASCIZ/ NI OR UNIBUS HALTED/ 


2544 
2545 021501 103 101 116 UNOFND: .ASCII/CANNOT CONTINUE - DNI, FATAL, AND USCI BITS/ 


2546 021554 111 116 040 -ASCIZ/IN ILLEGAL STATE/ 


2547 
2548 pet hb 103 101 oa. DNICLR: .ASCIZ/CANNOT CONTINUE - DNI WOULD NOT CLEAR FOLLOWING RESET/ 


ne ae ctl 
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GLOBAL TEXT SECTION 


2549 .EVEN 
2550 





SEQ 61 


ES A 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2564 
2565 
2566 
2567 


2568 


2569 
2570 


02 
2571 
02 


02 
2572 


2573 
2574 


2575 
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016752’ 
000002 


000006 


017007' 
000003 


000010 


016516' 
016514’ 
017070' 
000003 


000010 


.SBTTL GLOBAL ERROR REPORT SECTION 


p++ 
; THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 


; USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. 
; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 


BGNMSG 


ENDMSG 


BGNMSG 


ENDMSG 


BGNMSG 


ENDMSG 


BGNMSG 


MSGOO1 
PRINTB 


MSGO02 
PRINTB 


MSGOO03 
PRINTB 


MSG004 
PRINTB 


#FRMOO1,R2 


@FRMOO2 ,R3,R4 


#F RM0O3,EPCSRO,EPCSR1 


#F RMO04 ,,ECODE 


MSGOO1:: 


PRINTB 





SEQ 62 


R2,-CSP) 
—— 


R4,-CSP) 


EPCSR1,-CSP) 


ECODE, -( SP) 
oF RMOO4, -( SP) 
#2, -CSP) 








2 ea, 
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GLOBAL ERROR REPORT SECTION 

022004 010600 MOV SP .RO 
022006 104414 TRAP CSPNTB 
022010 062706 000006 ADD 06 ,SP 

2576 022014 PRINTB #FRMO15,STMSG 
022014 013746 036556‘ MOV STMSG, -( SP) 
022020 012746 020177’ MOV oF RMO15, -C SP) 
022024 012746 000002 MOV $2 ,-C(SP) 
022030 010600 MOV SP ,RO 

2032 104414 TRAP CSPNTB 

022034 062706 000006 ADD $6 ,SP 

2577 022040 ENDMSG 
022040 L10005: 

— 022040 104423 TRAP C$MSG 

2579 022042 BGNMSG M™SGOO05 
022042 MSGOOS: : 

2580 022042 PRINTB #&FRMOOS, XTORBO,ETORBO 
022042 013746 016540’ MOV ETORBO, -(SP) 
022046 013746 016550’ MOV XTDORBO, -C SP) 
022052 012746 017171' MOV oF RMOOS, -C SP) 
022056 012746 000003 MOV #3,-(SP) 
022062 010600 MOV SP RO 
022064 104414 TRAP CSPNTB 
022066 062706 000010 ADD #10,SP 

2581 022072 PRINTB #@FRMOO6, XTORB2,ETORB2 
022072 013746 016542’ MOV ETORB2 , -(SP) 
022076 013746 016552’ MOV XTORB2 , - (SP) 
022102 012746 017256' MOV oF RMOOG, -( SP) 
022106 012746 000003 MOV #3,-(SP) 
022112 010600 MOV SP .RO 
022114 104414 TRAP CSPNTB 
022116 062706 000010 ADD #10,SP 

2582 022122 PRINTB #FRMOO7, XTORB4 ,ETORB4 
022122 013746 016544’ MOV ETORB4 , - (SP) 
022126 013746 016554' MOV XTDRS4 , -CSP) 
022132 012746 017343' MOV @FRMOO7, -C SP) 
022136 012746 000003 MOV 63,-(SP) 
022142 010600 MOV SP .RO 
022144 104414 TRAP CSPNTB 
022146 062706 000010 ADD #10,SP 

2583 022152 PRINTB #FRMOOS, XTDORBE ,ETORB6 
022152 013746 016546’ MOV ETORBEG, - (SP) 
022156 013746 016556’ MOV XTORBE , - (SP) 
022162 012746 017430' MOV #FRMOOS, -( SP) 
022166 012746 000003 MOV 83,-(SP) 
022172 010600 MOV SP RO 
022174 104414 TRAP CS$PNTB 
022176 062706 000010 ADD #10,SP 

2584 022202 ENDMSG 
022202 L10006: 

ons 022202 104423 TRAP C$MSG 

2586 022204 BGNMSG MSG006 
022204 MSGOO6: : 

2587 022204 PRINTB #FRMOO09, XRDRBO,ERDRBO 
022204 013746 016520’ MOV ERDRBO, - (SP) 
022210 013746 016530' MOV XRDRBO , - (SP) 





a ee RT al 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2588 


2589 


2590 


02 
2591 
0 


2592 


2593 
02 


2594 


2595 


2596 
2597 


2598 


022214 


022372 
022376 
022376 
022376 


MACRO YOS.02 Friday 12-Jul-85 09:33 Page 16-e 


017515’ 
000003 


000010 


016522’ 
016532’ 
017602‘ 
000003 


000010 
016524' 


000010 


016526’ 
016536' 
017754' 
000003 


000010 


016564 ' 
016566' 
017007' 
000003 


000010 


016576' 
016574' 
020041 ' 
000003 


000010 





ENDMSG 


BGNMSG 


ENDMSG 


BGNMSG 


PRINTB 


PRINTB 


PRINTB 


MSGO007 
PRINTB 


MSGO008 
PRINTB 


#F RMO1O, XRORB2 , ERDRB2 


#FRMO11, XRORB4 ,ERORB4S 


@FRMO12, XRORB6 ,ERDRBE 


oF RMOO2, XDAT ,EDAT 


@FRMO13, XCRC,.XCRCB 


L10007: 


L10010: 





SEQ 64 
@F RMOO9, -C SP) 
03 ,-(SP) 
SP ,RO 
CSPNTB 
#10,S?P 


ERDRB2 , - (SP) 


EDAT ry -€SP) 


XCRCB, -C SP) 





A A cc mm 
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GLOBAL ERROR REPORT SECTION 


SEQ 65 


2599 022430 
022430 


2604 022506 
022506 





012746 


016572‘ 
016570' 
020120' 
000003 


000010 


000300’ 
020303’ 
000002 


000006 
000302’ 
020337’ 
000002 
000006 
000304 ' 
020373’ 
000002 
000006 
000306 ' 


020427' 
000002 


000006 


BGNMSG 


ENDMSG 


PRINTB @FRMO14,ECRC,ECRCB 


ae can) 


MSGO09 
PRINTB #FRMO18,PCBB 


PRINTB #FRMO19,PCBB+2 


PRINTB #@FRMO20,PCBB +4 


PRINTS @FRMO21,PCBB +6 


MSGO10 
PRINTB #FRMO2Z2,UDBB +4 

















EE TT 
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GLOBAL ERROR REPORT SECTION 
oie 022630 104423 TRAP C$MSG 
2613 022632 BGNMSG MSGO11 
022632 MSGOLI:: 
2614 a asin eens PRINTB #FRMO23,EPCSRO 
’ MOV EP RO, - Pp 
022636 012746 020547’ MOV orhnoes, (SP) 
022642 012746 000002 MOV @2,-C(SP) 
022646 010600 MOV SP ,.RO 
022650 104414 TRAP CS$PNTB 
022652 062706 000006 ADD 96 ,SP 
2615 022656 ENDMSG 
ooeese 104423 sien TRAP 
$ 
2616 — 
2617 .EVEN 
2618 : 
2619 022660 015 012 122 ERROOL: .ASCIZ <15><12>/REGISTER ACCESS ERROR/ 
022663 105 107 111 
C22666 i123 124 105 
022671 122 040 101 
022674 103 103 105 
022677 123 123 940 
022702 105 122 122 
022705 117 i122 000 
2620 022710 015 012 104 ERROO2: .ASCIZ <15><12>/DATA COMPARE ERROR IN PCSR2/ 
022713 101 124 101 
022716 040 103 117 
022721 115 120 101 
022724 122 105 040 
022727 105 122 122 
022732 117 122 040 
022735 111 116 040 
022740 120 103 123 
022743 122 062 000 
2621 022746 015 012 104 ERROO3: .ASCIZ <15><12>/DATA COMPARE ERROR IN PCSR3/ 
22751 101 124 101 
022754 040 103 117 
022757 115 120 101 
022762 122 105 040 
022765 105 122 122 
022770 117 122 040 
022773 1i1 116 040 
022776 120 103 123 
023001 122 063 000 
2622 023004 015 012 123 ERROOS: .ASCIZ <15><12>/SELF TEST FAILURE/ 
023007 105 114 106 
023012 040 124 105 
023015 123 124 040 
023020 106 101 111 
023023 114 125 122 
023026 105 000 
2623 023030 015 012 127 ERROOG: .ASCIZ <15><12>/WRITING ONE TO CLEAR DNI BIT FAILED/ 
023033 122 111 124 
023036 111 116 107 
023041 040 117 116 
023044 105 040 124 








GLOBAL AREAS 





GLOBAL ERROR REPORT SECTION 


023047 117 
023052 114 


2624 023076 O15 


2625 %23:. 101 


2626 023166 015 


2627 023224 116 


2628 923245 015 


2629 023303 107 


ERROO?: 


ERROOS: 


ERROOS: 





-ASCII 


-ASCII 


-ASCIT 


ae 
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<15><12>/NO DNI INTERRUPT OCCURRED / 


.ASCIZ /AFTER GET PCBB PORT COMMAND/ 


<15><12>/DNI BIT FAILED TO SET AFTER / 


-ASCIZ /NOP PORT COMMAND/ 


<15><12>/DNI BIT FAILED TO SET AFTER / 


.ASCIZ /GET PCBB PORT COMMAND/ 





SEQ 67 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2630 


2631 


2632 
2633 


2634 
2635 


2636 


2637 


023314 
023317 








—— eae eee 
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117 
040 


ERRO1O: 


ERRO11: 


ERRO12: 


ERRO13: 


-ASCII 


-ASCIZ 


-ASCIT 


-ASCIZ 


<15><12>/DNI BIT FAILED TO SET AFTER / 


.ASCIZ /GET CMD PORT COMMAND/ 


<15><12>/M68000 SUBSYSTEM FAILURE/ 


<15><12>/DNI BIT FAILED TO SET AFTER / 


-ASCIZ /START PORT COMMAND/ 


<15><12>/TXI BIT FAILED TO SET / 


SEQ 68 


ee 


GLOBAL AREAS 


GLOBAL ERROR REPORT SECTION 


023555 105 
023560 000 
2638 023561 015 
023564 122 


2639 023627 015 
02 


2640 023660 015 


2641 023726 015 


2642 023770 122 


124 


040 


ERRO14: 


ERROLS: 


ERRO16: 


ERROI7: 





-ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCITI 


Ena 
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<15><12>/WRITING ONE TO CLEAR TXI BIi FAILED/ 


<15><12>/RXI BIT FAILED TO SET / 


<15><12>/WRITING ONE TO CLEAR RXI BIT FAILED/ 


<15><12>/TIMEOUT ERROR - DELUA FAILED TO / 


-ASCIZ /RELINQUISH OWNERSHIP OF RDRB / 





SEQ 69 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2643 


2645 


2646 


2647 


2648 


SR 





RS 
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ERRO18: 


ERRO19: 


ERRO2O: 


-ASCII 


.ASCIT 


-ASCIT 


<15><12>/TIMEOUT ERROR - DELUA FAILED TO / 


-ASCIZ /RELINQUISH OWNERSHIP OF TORB / 


<15><12>/DNI BIT FAILED TO SET AFTER / 


-ASCIZ /STOP PORT COMMAND/ 


<15><12>/DATA COMPARE ERROR IN / 


-ASCIZ /TRANSMIT DESCRIPTOR RING/ 


ne 





SEQ 70 


—— ees eee rca, CC LLL LLL LLL 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2649 024267 
024272 


2650 


2651 


2652 


2653 


2654 
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ERRO21: 


ERRO22: 


ERRO23: 


ERRO24: 


ERRO2S: 


.ASCIT 


.ASCIZ 


. ASCIZ 


-ASCIZ 


-ASCIZ 


<15><12>/DATA COMPARE ERROR IN / 


-ASCIZ /RECEIVE DESCRIPTOR RING/ 


<15><12>/TRANSMIT-RECEIVE DATA COMPARE ERROR / 


<15><12>/CRC COMPARE ERROR / 


<15><12>/INTERNAL ROM CRC COMPARE ERROR / 


<15><12>/RCBI BIT FAILED TO SET / 





SEQ 71 


eee eel et LL LL LL 
SEQ 72 


GLOBAL AREAS 
GLUBAL ERROR REPORT SECTION 


2659 


2660 


2661 


024536 
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040 


000 


ERRO26: 
ERRO27: 


ERRO2S: 


ERRO29: 
ERROSO: 


-ASCII 


-ASCIT 


-ASCII 


<15><12>/TIMEOUT ERROR - DELUA FAILED TO RELINQUISH/ 


-ASCIZ / OWNERSHIP OF FIRST TORB/ 


<15><12>/TIMEOUT ERROR - DELUA FAILED TO RELINQUISH/ 


-ASCIZ / OWNERSHIP OF SECOND TDORB/ 


<15><12>/TIMEOUT ERROR - DELUA FAILED TO RELINQUISH/ 





ee eee mle LLL LDL 
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GLOBAL ERROR REPORT SECTION 


2666 025027 040 117 i27 .ASCIZ / OWNERSHIP OF FIRST RDRB/ 


2667 025060 015 012 = ERRO31: .ASCII <15><12>/TIMEOUT ERROR - DELUA FAILED TO RELINQUISH/ 


2668 025134 040 117 127 -ASCIZ / OWNERSHIP OF SECOND RDORB/ 


2670 025166 ERROS2: 
2672 025166 015 012 aoe ERRO33: .ASCII <15><12>/DATA COMPARE ERROR IN / 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2673 025216 
025221 


2674 


02 
2675 


2680 


2681 





El 
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ERRO34: 


ERROSS: 
ERROSE: 


ERRO37: 


.ASCIZ /FIRST TRANSMIT DESCRIPTOR RING/ 


-ASCII <15><12>/DATA COMPARE ERROR IN / 


-ASCIZ /SECOND TRANSMIT DESCRIPTOR RING/ 


-ASCII <15><12>/DATA COMPARE ERROR IN / 


.ASCIZ /FIRST RECEIVE DESCRIPTOR RING/ 


ASCII <15><12>/DATA COMPARE ERROR IN / 





SEQ 74 


2 eee —EEE—Eee————————————— al, 
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GLOBAL ERROR REPORT SECTION 


02 
2682 onhecs 1235 105 103 -ASCIZ /SECOND RECEIVE DESCRIPTOR RING/ 


02 
2683 anaes 015 012 ao ERRO38: .ASCIZ <15><12>/DNI BIT NOT SET AFTER PORT HALT COMMAND / 


02 
2684 poi nd 015 012 7 ERRO39: .ASCII <15><12>/ERROR - LOOPBACK SUCCESSFUL WITH/ 


025636 110 
2685 025637 015 012 111 -ASCIZ <15><12>/INVALID DESTINATION ADDRESS / 
025642 116 126 101 


2686 025676 015 012 aa ERRO4O: .ASCIZ <15><12>/FATAL ERROR - DELUA ID BIT NOT SET/ 





em ee LLL 


GLOBAL AREAS 
GLOBAL ERROR REPORT SECTION 


2687 
2688 


2689 
2690 


2692 
2693 


2694 


02 
026071 
026074 


026076 
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ERRO41: 


ERRO42: 


ERRO43: 


.ASCIZ 


~ASCIT 


-ASCII 


<15><12>/INTERNAL MEMORY DATA COMPARE ERROR / 


<15><12>/DNI BIT FAILED TO SET AFTER / 


.ASCIZ /SELF TEST PORT COMMAND/ 


<15><12>/'BUFL',IN TORB+6 NOT SET ON XMIT BUFF / 


-ASCIZ /OVERFLOW WITH <DTCR=0>/ 


SEQ 76 


— ae 
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GLOBAL ERROR REPORT SECTION 


2695 pave Ey 015 012 047 ERRO44: .ASCII -15><12>/'BUFL’ IN TDRB+6 NOT SET ON XMIT BUFF / 


2696 026245 117 126 105 -ASCIZ /OVERFLOW WITH <DTCR=1>/ 


2698 026274 015 O12 = ERRO45: .ASCIZ <15><12>/PCSRO INTERRUPT BIT CLEAR ERROR / 


2699 
2700 026337 015 012 122 ERRO46: .ASCIZ <15><12>/RECEIVED PACKET COUNTER NOT GREATER THAN O / 


026403 122 040 124 
06 110 101 116 
026411 060 040 











a 2 eT RR 
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GLOBAL ERROR REPORT SECTION 


02 000 
2701 po nee 015 012 = ERRO47: .ASCIZ <15><12>/SPARE / 


05 000 
2702 026426 015 012 4 ERRO48: .ASCIZ <15><12>/FATAL BIT SET DUE TO DEVICE OR UNIBUS ERROR / 


2703 -EVEN 





GLOBAL AREAS 








eS 


MACRO YOS.02 Friday 12-Jul-85 09:33 Page 17 SEQ 79 


GLOBAL MACRO AND SUBROUTINES SECTION 


.SBTTL GLOBAL MACRO AND SUBRO''TINES SECTION 


FERRERS EASASAEERESAEAEREEEASESEEDEAEESSEEEAERESEEEESESEAEEEEEEEEEEESEEEEEEEEEES 


MACRO FTL 
THIS MACRO CALLS SUBROUTINE ‘CHKFTL’ 
CALL: FIL 


2 
* 
; 
‘ 
i 
ey 
SREREAERAEASARESALEEEEAESEEERAAEEEEABASEREEEEASEEEEEEEAESEEEEEEESEESE EE EEEE SES 


-MACRO FTL 


-NLIST 
-LIST ME 
-LIST 


JSR PC,.CHKFTL ; ‘FATL‘ BIT SET? 


-NLIST ME 
.ENDM 








a eee cml ee A LL LLL LLL LL LS 
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GLOBAL MACRO AND SUBROUTINES SECTION 


2729 FESESESSSEAEESSEHAEHERASE SHADES AAEESSEEESEAES EERE SEAEHEEHEEEEEEEREAEEREEEHEEEEE 


MACRO PNTMAC 


THIS MACRO WILL SETUP AND CALL SUBROUTINE ‘PNTIO’, 
WHICH WILL THEN DISPLAY TEST NUMBER AND NAME. 


CALL: PNTMAC tname 


WHERE ‘tneame’ IS THE POINTER TO THE 


: 
3 
; 
2735 ; 
; 
; TEST NAME MESSAGE. 


274i s SESEPRAASACEASRALELEEALEAASEEASARAKSSCALESSASRAAESASAEASEASASESSAKSEAAASESAAALESLEEASE 


2743 -MACRO PNTMAC TNAME 


2745 -NLIST 
2746 -LIST ME 
2747 -LIST 


2748 
2749 MOV #TNAME .R4 ;GET POINTER TO TEST NAME MESSAGE 
2750 JSR PC,PNTID ;PRINT TEST NUMBER AND NAME 


2752 : END OF MACRO EXPANSION OF ‘PNTMAC’ 


2754 -NLIST ME 
2755 .ENDM 





— RT 
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GLOBAL AREAS 


GLOBAL MACRO AND SUBROUTINES SECTION 


2757 
2758 


026506 
026506 
026510 
026512 
026514 
026514 
026516 
026522 
026522 


026524 
026526 


026530 
026534 
026536 


026540 
026542 
026544 
026546 


010146 
010246 
010546 


112105 
004737 


077204 


005103 
005104 


012702 
010422 
010322 


012605 
012602 
012601 
000207 


031160' 


016574! 





—— al 


SEQ 81 


s RERSESEAEASALESEAEEREAESESEAAKESESEEEEELEAEEEEAEEEEEEESEEEEESEEEAESEADRED ES 


SUBROUTINE - BLKCRC 
THIS ROUTINE PERFORMS A CRC CALCULATION ON A BLOCK OF DATA 
THIS ROUTINE USED FOR ALL CRC CALCULATIONS EXCEPT ROM. 
INPUTS: Ri CONTAINS BASE ADDRESS OF DATA BLOCK 
R2 “WTAINS DATA BLOCK BYTE COUNT 
R3,%4 CONTAINS INITIAL CRC 
OUTPUT: R3,R4 CONTAIN CRC CODE 
CALLING SEQUENCE: MOV #_,R1 ;GET BASE ADDRESS 
#_,Re ;GET BYTE COUNT 
JSR PC ,BLKCRC ;CALCULATE CRC 


e RKERKAEARARESAAAEEAELALREALAREEEAEREEAALEREBLABRABASASESALAEAAASEAAEESELASEE SAE 


BLKCRC: 
MOV R1,-(SP) ;SAVE RL 
MOV R2,-(SP> ;SAVE R2 

; MOV R5,-(SP) ;SAVE RS 

$: 

MOVB  (R1)+,R5 ;GET NEXT BYTE 

r JSR PC ,GETCRC ;CALCULTATE THE CRC 

SOB R2,18 ;LOOP TILL DONE 

CoM R3 ; COMPLIMENT 
COM R4 ; RESULTS 
MOV @xCRC,R2 ; BASE ADDRESS OF SAVED CRC 
MOV R4,(R2)+ ; SAVE 1ST WORD 
MOV R3,(R2)+ ; SAVE 2ND WORD 
MOV (SP)+,R5 ;RESTORE RS 
MOV (SP)+,R2 sRESTORE R2 
MOV (SP)+,R1 ;RESTORE R1 
RTS PC ;RETURN TO CALLING ROUTINE 





RD 
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GLOBAL MACRO AND SUBROUTINES SECTION 

2801 

2802 p REESE EEASEEAEREEREASEEEAEEEEEEEEEEEEREEEEEAEEEREREEEEEEEEEEEEEREE DEEDES 

2803 : 

2804 ; SUBROUTINE - CHKDONI 

2805 $ 

poe ; THIS ROUTINE WAITS FOR DNI TO SET. 

2808 : INPUTS: NONE 

2809 ; 

2810 : OUTPUTS: IF DNI SETS 

2811 ; THEN CARRY = 0 

2812 : 

2813 : IF DNI FAILS TO SET 

2814 : THEN CARRY = 1 

2815 : PCSRO -> EPSCRO 

2816 : PCSRi -> EPCSR1 

2817 : 

2818 : CALLING SEQUENCE: 

2819 $ JSR PC ,CHKONI 

2820 3 

2821 pRRRREEKEEEERERERERE AA EREEEEEEEAESEEEAEEESEAEAELEEEAERESESESEEEEEEEEEE EES 

2822 

2823 026550 CHKONI 

2824 026550 010046 RO, -CSP> ; SAVE RO 

2825 026552 010146 MOV R1i,-CSP) ; SAVE R1 

2826 026554 010446 MOV R4,-CSP) ; SAVE R4 

2827 026556 012737 000600 016602’ MOV #600 ,METER sPUT SOME TIME IN THE TIMER 

2828 026564 004737 033416' JSR PC.TIM ; TURN ON THE LINE CLOCK 

2829 026570 017704 151430 10$: MOV @PCSRO,R4 ;GET PCSRO 

2830 026574 032704 004000 BIT #DNI ,.R4 :1S ONI SET? 

2831 026600 001015 BNE 30$ ;YES 

2832 026602 BREAK ;NO, VISIT DRS FOR A MOMENT 

026602 104422 TRAP CS$BRK 

2833 026604 005737 016602’ TST METER ;HAS TIMER EXPIRED? 

2834 026610 001367 BNE 10$ sNOT YET 

2835 026612 010437 016514’ MOV R4,EPCSRO ; PCSRO -> EPCSRO 

2836 026616 017737 151404 016516‘ ; PCSRi -> EPCSR1 


2837 026624 004737 033402’ 


2840 026634 004737 033402’ 


MOV OPCSR1 ,.EPCSR1 
JSR PC, TIMOFF 


;TURN OFF THE TIMER 


SEC ; SET CARRY 

BR 40$ 
30$ JSR PC, TIMOFF ;TURN OFF THE TIMER 

CLC ; DNI SET SO CLEAR CARRY 
40$ MOV (SP)+,R4 ; RESTORE R4 

MOV (SP)+,R1 ; RESTORE Ri 

MOV (SP)+,RO ; RESTORE RO 

RTS PC ; AND RETURN 





A ST 


GLOBAL AREAS 


2874 








ee 
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GLOBAL MACRO AND SUBROUTINES SECTION 


151344 
001000 


026726' 
000001 


000004 
151312 
151306 


016514' 
016516' 


pReRaRESACAAERASEEALEREAESERALED ALE aA Ea EEAEREEESEAREEESEESEEEEEEEEEKS 


SUBROUTINE - CHKFTL 


THIS SUBROUTINE WILL CHECK FOR FATAL ERROR BIT SET 
If SET, WILL ISSUE MESSAGE TO IGNORE CONTENTS OF PCSR1 


INPUTS: NONE 
OUTPUTS: IF 'FATL' SET, MESSAGE PRINTED 


CALL: JSR PC ,CHKFTL 


KRAAKAARARAAAERARALERAAEEAAEALEARAAEAEAAEEEEAEESASEASEAEEALESESAESAEEEEEEEE 


CHKF TL: 


RO, -CSP) ;SAVE RO 

MOV @PCSRO,RO ;GET CONTENTS OF CSRO 

BIT GF ATL,RO ;CUNTENTS OF PCSR1 VALID? 

BEQ 1$ sYES, EXIT 

PRINTF @FTLSET 
MOV 
MOV 
MOV 
TRAP 
ADD 

1$: MOV @PCSRO,EPCSRO ;SAVE CONTENTS OF PCSRO 

MOV @PCSR1,EPCSR1 ;SAVE CONTENTS OF PCSR1 

MOV (SP)+,RO sRESTORE RO 

RTS PC ;sRETURN TO CALLING ROUTINE 


EE ES SRA me 


SEQ 83 


oF TLSET, -( SP) 
#1,-CSP) 


SP ,RO 
CSPNTF 
#4 SP 


FILSET:.asciz/SNSA’FATL’' BIT SET - DATA IN PCSR1i NOT VALID FOR THIS ERROR. / 


even 








= - eel, cA A LE CL LLL LLL LLL LL 


‘ 
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GLOBAL MACRO AND SUBROUTINES SECTION 
2876 FARRER AEEEREEAEEAEEEAEEERAAEEEAEEEDEREAEEAEEERER SEES SEER SARE EDS SEER ERODE 
2877 ; 
pot : SUBROUTINE - CHKOWN 
: 
2880 ; THIS ROUTINE CHECKS FOR THE OWNERSHIP BIT IN 
poe 3 BOTH TRANSMIT AND RECEIVE DESCRIPTOR RINGS. 
; 
cane ; INPUTS: RS = ADDRESS OF DESCRIPTOR RING 
: 
2885 ; OUTPUTS: IF OWN BIT = O CPORT DRIVER) 
2886 3 THEN CARRY = 0 
2887 3 
2888 : IF OWN BIT = 1 CUNA) 
2889 : THEN CARRY = 1 
2890 : 
2891 SRREREEAREEARE EERE EERE EREAEEEEREEREEEEEEEEEREE SEES EE EE EEE SESE EE EEE EAE EES 
2892 
2893 027024 CHKOWN: 
2894 027024 010046 MOV RO, -CSP) ; SAVE RO 
2895 027026 010446 MOV R4,-(CSP) ; SAVE R4 
2896 027030 012704 000010 MOV #10,R4 ; DELAY VALUE 
2897 027034 004737 033416’ JSR PC, TIMON ; TURN ON CLOCK 
2898 027040 016500 000004 i$: MOV 4(R5),R0 ; GET TROB+4 
2899 027044 032700 100000 BIT #0WN ,RO ; BIT1S, OWNERSHIP SET? 
2900 027050 001406 BEQ 10$ ; NO, EXIT ROUTINE 
2901 027052 BREAK ; VISIT ORS WHILE WAITING 
027052 104422 TRAP CSBRK 
2902 027054 005737 016602' TST METER ; TIME UP? 
2903 027060 001367 BNE i$ ; NO,LOOP AGAIN 
2904 027062 000261 SEC -3 YES, SET CARRY = 1 
aoet 027064 000401 BR 20$ ; GET OUT 
2907 027066 000241 10$: CLC ; CLEAR CARRY 
2908 027070 20$: 
2909 027070 004737 033402' JSR PC , TIMOFF ; TURN OFF TIMER 
2910 027074 012604 MOV (SP)+,R4 ; RESTORE R4 
2911 027076 012600 MOV (SP)+,RO ; RESTORE RO 
2912 027100 000207 RTS PC ; AND RETURN 
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GLOBAL MACRO AND SUBROUTINES SECTION 
2914 
2915 sRRAEAEA ERAS SEES EASED AEEAAEEAAEEAESEADEEAEEERESEEAEEEEE SEES SEED SEED SEEDS 
2916 : 
ped : SUBROUTINE - CHKRCE 
: 
poe : THIS ROUTINE WAITS FOR RCBI TO SET. 
2921 ; INPUTS: NONE 
2922 : 
2923 : OUTPUTS: IF RCBI SETS 
2924 : THEN CARRY = 0 
2925 : 
2926 : IF RCBI FAILS TO SET 
2927 : THEN CARRY = 1 
2928 3 PCSRO -> EPSCRO 
2929 : PCSRi -> EPCSR1 
2930 ; 
2931 : CALLING SEQUENCE: 
2932 : JSR PC ,CHKRCE 
2933 ; 
2934 FRRRERRAASEERERAEERSEEEEAEEAEEEEASEADESARESARESEESEREAEESE EE SEEDEEEDEEEES 
2935 
2936 027102 CHKRCE : 
2937 027102 010046 MOV RO, -CSP> ; SAVE RO 
2938 027104 010146 MOV R1i,-CSP) ; SAVE R1i 
2939 027106 012737 000473 016602‘ MOV @5«SECOND, METER ;PUT SOME TIME IN THE TIMER 
2940 027114 004737 033416’ JSR PC, TIMON ; TURN ON THE LINE CLOCK 
2941 027120 017737 151100 000236’ 10%: MOV SPCSRO,PCSROC ;GET PCSRO 
2942 027126 032737 002000 000236' BIT #RCBI,PCSROC ;I1S RC6I SET? 
2943 027134 001016 BNE 30$ ;YES 
2944 027136 BRF AK 3NO, VISIT ORS FOR A MOMENT 
027136 104422 ™ CSBRK 
2945 027140 005737 016602‘ Ts° METER ;HAS TIMER EXPIRED? 
2946 027144 001365 BNE 10$ ;NOT YET 
2947 027146 013737 000236‘ 016514’ MOV PCSROC ,EPCSRO ; PCSRO -> EPCSRO 
2948 027154 017737 151046 016516‘ MOV @PCSR1,EPCSR1 ; PCSR1I -> EPCSR1 
2949 027162 004737 033402’ JSR PC, TIMOFF ;s TURN OFF THE TIMER 
2950 027166 000261 SEC ; SET CARRY 
2951 027170 000403 BR 40$ 
2952 027172 004737 033402' 30$: JSR PC, TIMOFF ;TURN OFF THE TIMER 
2953 027176 000241 cLc ;RCBI SET SO CLEAR CARRY 
2954 027200 40$: 
2955 027200 012601 MOV CSP)+,R1 ; RESTORE Ri 
2956 027202 012600 MOV CSP)}+,RO ; RESTORE RO 
2957 027204 000207 RTS PC ; AND RETURN 
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2959 
2960 [RREEREAEAEREAEEEEREAESEEAEDEESAAEAEEAEE EEE EEE EEEEES EE ERED ESOS EEEREE EES 
2961 : 
phe : SUBROUTINE - CHKRDR 
’ 
2964 ; THIS SUBROUTINE COMPARES A RECEIVE DESCRIPTOR RING ENTRY 
pe ; WITH EXPECTED DATA. 
: 
pio : INPUTS: RS = ADDRESS OF RORB TO BE COMPARED. 
: 
2969 : INPLICIT INPUTS: 
ar ; XRDRBO = TABLE WITH EXPECTED DATA 
2972 : OUTPUTS: IF COMPARE IS SUCCESSFUL 
2973 ; THEN CARRY = 0 
2974 : 
2975 : IF COMPARE IS UNSUCCESSFUL 
2976 ; THEN CARRY = 1 
2977 : EXPECTED RORB+O = XRDRBO 
2978 : EXPECTED RDRB+2 = XRORB2 
2979 ; EXPECTED RDRB+4 = XRDRB4 
2980 : EXPECTED RDRB+6 = XRDRBE 
2981 ; ACTUAL RORB+0 -> ERDRBO 
2982 : ACTUAL RORB+2 -> ERDRB2 
2982 $ ACTUAL RDORB+4 -> ERDRB4 
2984 3 ACTUAL RDRB+6 -> ERDRB6 
2985 ; CALLING SEQUENCE: 
2986 : JSR PC ,CHKRDR 
2987 ; 
2988 Sade ahhhoh SEEDS EEEESEESESEE ES ESOS SEED ES EEEEOEEE ES 644544 4606 4444444448484 
2989 
2990 027206 CHKROR : 
2991 027206 010046 MOV RO, -CSP) ; SAVE RO 
2992 027210 010146 MOV Ri,-(SP) ; SAVE R1 
2993 027212 010346 MOV R3,-CSP) ; SAVE RS 
2994 027214 010446 MOV R4,-(SP) ; SAVE R4 
2995 027216 012700 000004 MOV #4,R0 ; DO FOUR COMPARES 
2996 027222 012703 016530’ MOV #XRDORBO RS ; R3 POINTS TO EXPECTED DATA 
2997 027226 010504 MOV oR4 ; R4&4 POINTS TO ACTUAL RDRB 
2998 027230 10$: 
2999 027230 022324 CMP (R3)+,CR4)+ ; ERROR IN ACTUAL TABLE DATA? 
3000 027232 001012 BNE 20$ ; YES 
3001 027234 005300 DEC RO ; REDUCE LOOP COUNT 
bee 027236 001374 BNE 10$ ; IF NOT FINISHED, LOOP AGAIN 
3004 027240 011400 MOV CR4),RO ; RDRB+6 -> RO 
3005 027242 042700 007777 BIC eT K,RO ; OUT TOR VALUE 
3 027246 011301 MOV CR3),R1 ; GET EXPECTED 
3007 027250 042701 007777 BIC #TORMSK ,R1 ; MASK OUT TOR VALUE 
3008 027254 020001 CMP ‘ ; COMPARE ERROR ? 
3009 027256 001411 BEQ 30$ ; YES 
3010 027260 20$: 
3011 027260 012703 016520’ MOV #ERDRBO, RS ; R3 POINTS TO ACTUAL TABLE 
3012 027264 010504 MOV R5.R4 ; R4 POINTS TO ACTUAL RDRB 
3013 027266 012423 MOV CR4)+,CR3)+ ; LOAD ACTUAL TABLE 
3014 027270 012423 MOV (R4)+,CR3)+ 
3015 027272 012423 MUV (R4)+,CR3)+ 





A SE oe merece 
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3016 027274 





SS 
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012423 


30$: 
40$: 


(R4)+,CR3)+ 
40$ 


(SP)+,R4 
(SP)+,R3 
(SP)+,R1 
(SP)+,RO 
PC 


; SET CARRY 


CLEAR CARRY 
RESTORE R4 
RESTORE R3 
RESTORE R1 
RESTORE RO 
AND RETURN 





SEQ 87 








SEQ 88 
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3026 
ase? SeRRRSEEEREEEEEESESERESESAEEEEEEEEAAAEEEASEEEAAEEEEEEAEAASAS AERA EE EE ERERS 
3029 : SUBROUTINE - CHKRXI 
3030 : 
oes : THIS ROUTINE WAITS FOR RXI TO SET. 
; 
3033 ; INPUTS: NONE 
3034 : 
3035 ; OUTPUTS: IF RXI SETS 
3036 : THEN CARRY = 0 
3037 3 
3038 : IF RXI FAILS TO SET 
3039 ; THEN CARRY = 1 
3040 : PCSRO -> EPSCRO 
3041 : PCSR1 -> EPCSR1 
3042 3 
3043 : CALLING SEQUENCE: 
3044 3 JSR PC ,CHKRXI 
3045 ; 
3046 sRRaERERESEEREREEREREESEEEEEEEEE SS EAEEEREEEE SEES ES EEEEEEEEED EEE SEED EE EES 
3947 
3048 027316 CHKRXI: 
3049 027316 010046 MOV RO, -CSP)> ; SAVE RO 
3050 027320 010146 MOV R1,-CSP) ; SAVE 3 
3051 027322 010446 MOV R4,-C(SP) ; SAVE R 
3052 027324 012737 000176 016602' MOV #24SECOND, METER 3;PUT SOME TIME IN THE TIMER 
3053 027332 004737 033416’ JSR PC, TIMON ;TURN ON THE LINE CLOCK 
3054 027336 017704 150662 10$: MOV BPCSRO,R4 ;GET PCSRO 
3055 027342 032704 020000 BIT @RXI ,R4 71S RXI SET? 
3056 027346 001015 BNE 30$ ;YES 
3057 027350 BREAK ;NO, VISIT DRS FOR A MOMENT 
027350 104422 TRAP CSBRK 
3058 027352 005737 016602' TST METER sHAS TIMER EXPIRED? 
3059 027356 001367 BNE 10$ ;NOT YET 
3069 027360 010437 016514’ MCV R4,EPCSRO ; PCSRO -> EPCSRO 
3061 027364 017737 150636 016516’ MOV @PCSR1.EPCSR1 ; PCSR1I -> EPCSR1 
3062 027372 004737 033402' JSR PC,T IMOFF STURN OFF THE TIMER 
3063 027376 000261 SEC ; SET CARRY 
3064 027400 000403 BR 40$ 
3065 027402 004737 033402’ 30$: JSR PC , TIMOFF ;TURN OFF THE TIMER 
3066 027406 000241 CLC ; RXI SET SO CLEAR CARRY 
3067 027410 012604 40$: MOV (SP)+,R4 ; RESTORE R4 
3068 027412 12601 MOV (SP)+,Ri ; RESTORE Ri 
3069 027414 012600 MOV CSP)+,RO ; RESTORE RO 
3070 027416 000207 RTS PC ; AND RETURN 








al 





SEQ 89 
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3072 
3073 SRRRAESAEEESEDASSAEEESEREEEAEEEEEEEE ERODED EEEEESESEAEEEEEDEEEDEDE! SODEEESD 
3074 
bk : SUBROUTINE - CHKSTR 
3 
ae ; THIS TEST CHECKS THE SELF TEST RESULTS. 
3079 : INPUTS: NONE 
3080 3 
3081 ; OUTPUTS: IF SELF TEST SUCCESSFUL 
3082 $ THEN CARRY = 0 
3083 ; 
3084 : IF SELF TEST Anal 
3085 : THEN CARRY 
ooae $ SELF TEST cope SHIFTED RIGHT -> ECODE 
; 
3088 ; CALLING SEQUENCE: 
3089 : JSR PC ,CHKSTR 
3090 : 
3091 sRRRASSREEAEREREESERERAEEEAEEEREEE EASA EESEEEADEEEEESEEEE EEE EEEE ERED EEEES 
3092 
3093 027420 CHKSTR: 
3094 027420 010046 MOV RO, -CSP) ; SAVE RO 
3095 027422 010446 MOV R4,-CSP> ; SAVE R4 
3096 027424 017704 150576 MOV aPCSR1, R4 ; PCSR1I -> 
3097 027430 042704 140377 BIC @STMASK, R4 ; MASK omar TEST CODE BITS 
3098 027434 022704 000000 CMP #GO0DST,R4 ; SELF TEST SUCCESSFUL ? 
zoos 027440 001413 BEQ 10$ ; YES 
: 
3101 ; SELF TEST FAILED 
3102 027442 042704 140377 BIC #STMASK ,R4 
3103 027446 012700 000010 MOV oe ; SHIFT CODE RIGHT 
3104 027452 006204 5$: ASR R4 
3105 027454 005300 DEC RO 
3106 027456 001375 BNE 5$ 
3107 027460 010437 016600’ MOV R4 ,ECODE ; SHIFTED CODE -> ECODE 
3108 027464 000261 SEC ; SET CARRY 
3109 027466 000401 BR 203 
3110 027470 000241 10$: CLC ; SELF TEST PASSED CLEAR CARRY 
3iii 027472 012604 20%: MOV (SP)+,R4 ; RESTORE R4& 
3112 027474 012600 MOV (SP)+,RO ; RESTORE RO 
3113 027476 000207 RTS PC ; AND RETURN 
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SEQ 90 


fSESSEESERESESEEEEESESEEEEESSESEEEAEEESESEASSSAEEESEESESSESEEEAESSEEESEEEEEEEE 


SUBROUTINE - CHKTOR 


THIS SUBROUTINE COMPARES A TRANSMIT DESCRIPTOR RING ENTR\ 
WITH EXPECTED DATA. 


RS = ADDRESS OF TORB TO BE COMPARED 


CHKTDR : 


10$: 


30$: 
40$: 


INPUTS: 


IMPLICIT INPUTS: 


OUTPUTS: 


CALLING SEQUENCE: 
JSR PC .CHKTOR 


666666646266 6846666466666 64 6 0466660466666 6666 6646666406 6664666664666 4666646466466 


XTORBO = TABLE WITH EXPECTED DATA 
IF COMPARE IS pag 
THEN CARRY 


= 0 


IF COMPARE IS UNSUCCESSFUL 
THEN CARRY = 1 


RO, -CSP) 
R3, -(SP) 
R4, -(SP) 


04,RO 
a 


CR3)+, CR4)+ 
20° 


RO 
10% 


30$ 

ME TDORBO, RS 
R5,R4 
(R4)+,(R3)* 
(R4)+,CR3)+ 


(R4)+,(R3)+ 
CR4)+,CR3)> 


409 


(SP)+,R4 
(SP)+,R3 
(SP)+,RO 
PC 


EXPECTED TORB+0 


EXPECTED TORB+2 = XTORG2 


EXPECTED TORB+4 


EXPECTED TORB+6 = XTORB6 


ACTUAL TORB+6 -> ETORB6 


COMPARES 
R3 POINTS TO EXPECTED DATA 
R4 POINTS TO ACTUAL TORB 


ge IN ACTUAL TABLE DATA? 
REDUCE LOOP COUNT 

IF NOT FINISHED, LOOP AGAIN 
R3 POINTS TO ACTUAL TABLE 


R4 POINTS TO ACTUAL TORB 
LOAD ACTUAL TABLE 


SET CARRY 


CLEAR CARRY 
RESTORE R4 
RESTORE R3 
RESTORE RO 
AND RETURN 
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3172 
ae7e | OOOO O6460666 404006000606 0450464046 4406 004006040440 000000400008080000888 
174 
hy ; SUBROUTINE - CHKTXI 
$ 
siee $ THIS ROUTINE WAITS FOR TXI TO SET. 
; 
3179 ; INPUTS: NONE 
3180 $ 
3181 : OUTPUTS: IF TXI SETS 
3182 $ THEN CARRY = 0 
3183 : 
3184 : IF TXI FAILS TO SET 
3185 ; THEN CARRY = 1 
3186 ; PCSRO -> EPSCRO 
3187 : PCSRi1 -> EPCSR1 
3188 : 
3189 ; CALLING SEQUENCE: 
rey : JSR PC ,CHKTXI 
: 
3192 [Robb h hd hb bb oS SEES EEESEEESEEEEEENE OOO 40460466 60606408606 6640600600888 
193 
3194 027566 CHKTXI: 
3195 027566 01 MOV RO, -CSP> ; SAVE RO 
3196 027570 010146 MOV R1,-CSP) ; SAVE R1i 
3197 027572 O1 MOV R4,-(SP) ; SAVE R4 
3198 027574 012737 000176 016602’ MOV #2¢SECOND, METER 3;PUT SOME TIME IN THE TIMER 
3199 027602 004737 033416' JSR PC, TIMON ;TURN ON THE LINE CLOCK 
027606 017737 150412 000236' 10$: MOV @PCSRO,.PCSROC sGET PCSRO 
3201 027614 032737 010000 000236’ BIT @TXI,PCSROC 31S TXI SET? 
3202 027622 001016 BNE 30$ ;YES 
3203 027624 BREAK 3NO, VISIT ORS FOR A MOMENT 
0276 044 TRAP CsBRK 
3204 027626 005737 016602' TST METER sHAS TIMER EXPIRED? 
3205 027632 001365 BNE 10$ sNOT YET 
027634 013737 000236’ 016514’ MOV PCSROC .EPCSRO ; PCSRO -> EPCSRO 
3207 027642 017737 150360 016516‘ MOV @PCSR1 .EPCSR1 ; PCSRi -> EPCSR1 
3208 027650 004737 033402' JSR PC. TIMOFF STURN OFF THE TIMER 
3209 027654 000261 SEC ; SET CARRY 
3210 027656 000403 BR 40$ 
3211 027660 004737 033402' 30%: JSR PC, TIMOFF ;TURN OFF THE TIMER 
3212 027664 000241 CLC ; TXI SET = CLEAR CARRY 
027 012604 40%: MOV (SP)+,R4 ; RESTORE R 
3214 027670 012601 MOV (SP)-, ai ; RESTORE a 
3215 027672 012600 MOV (SP)+,RO ; RESTORE RO 
3216 027674 000207 RTS PC ; AND RETURN 








GLOBAL AREAS 


027676 
027700 
027704 
027710 
027712 
027716 
027724 
027726 
027730 
027732 
027734 





010446 
017704 
032704 
001007 
010437 
017737 
000261 
000401 
000241 
012604 
000207 


Ema 
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150320 
100000 


016514' 


150304 016516' 


SEQ 92 


FS SSSSESESSSEAEASSEAESEESESESEEESESEESEEEESEEEEEEEEEREEEREESESESEAEEEEEEESE 


SUBROUTINE - CHKSER 
THIS ROUTINE CHECKS FOR THE SERI BIT IN PCSRO. 
INPUTS: NONE 


OUTPUTS: 


CALLING SEQUENCE : 
JSR 


CHKSER : MOV 
MOV 


10$: 
20$: 


BIT 


IF SERI BIT SET THEN CARRY = 0 
IF SERI BIT NOT SET THEN CARRY = 1 


PCSRO -> EPCSRO 
PCSR1 -> EPCSR1 


PC,CHKSER 


ARAKEASKALARESAAEAERAESALASEASEAEKASEHEAERASASEAASEEASSELALALAEAEAAEESAEELES 


R4,-(SP) ;SAVE R4 


R 
;GET PCSRO CONTENTS 


#SERI,R4 :1S SERI BIT SET? 
10$ ;YES 
R4,EPCSRO sNO, SAVE PCSRO CONTENTS 
@PCSR1 .EPCSR1 sGET PCSR1 CONTENTS TOO 
sINDICATE NO SERI BIT 
20$ ;LEAVE 
sINDICATE SERI BIT SET 
aaa ca sRESTORE R4 
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3275 
3276 
3277 


027736 
027736 
027740 
027742 
027744 
027752 
027756 
027756 
027762 
027766 
027770 
027770 
027772 
027776 


030000 
030004 
0390004 
030010 
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010046 
010146 
010446 
012737 
004737 


017704 
032704 
001025 


104422 
005737 
001367 


004737 


012746 
012746 
010600 
104417 
062706 


010437 
017737 
000261 
000403 


001661 016602’ 


033416' 


150242 
004000 


016602' 


033402‘ 
030060 ° 
000001 
000004 
016514’ 


150172 016516' 


ee 


SEQ 93 


FeAESASESESSASSEEASSEESAESEEEESESEESEA EEE SE EEEEEEEESEEEEESESEEEEESESEEEEEES 


SUBROUTINE - CKONI 


THIS SUBROUTINE WAITS FOR DONE INTERRUPT CONI)TO SET. 

IF A ONI IS RECEIVED BEFORE TIMER EXPIRES, PROCEED OK. IF 

TIMER EXPIRES PRIOR TO AN INTERRUPT, OR THE INTERRUPT WAS 

NOT CAUSED BY A DNI, THEN THE APPROPRIATE ERROR MESSAGE IS 


ISSUEC. 
INPUTS: 


: 

: 

i 

' 

: NONE 
; 

OUTPUTS: 

; 


CALLING SEQUENCE : 
JSR 


IF DNI SETS PRIOR TO TIMER TIME OUT 
THEN CARRY BIT = 0 


ELSE 
CARRY BIT = 1 
PCSRO -> EPSCRO 
PCSR1i -> EPSCR1 


PC ,CKDNI 


SRAKRAKALELALAAAAARASCAESSASASRELASAAEALEASLESLSEAASEASASESASEASESASESAAEEESEEE 


CKDNI: 
MOV RO, -CSP) 
MOV R1,-CSP) 


MOV #15. *SECOND, METER 


JSR PC, TIMON 


MOV @PCSRO ,R4 
BIT @ONI .R4 
BNE 


10$: 


20$ 
BREAK 
TST METER 
BNE 10$ 


sTIMER EXPIRED BEFORE ONI SET 


JSR PC, TIMOFF 
PRINTF ¢INTMG1 


MOV R4,EPCSRO 
MOV @PCSR1,EPCSR1 


BR 40$ 
20$: 


SAVE RO 

SAVE R1 

SAVE R4 

PUT ENOUGH TIME ON TIMER 
TURN ON THE LINE CLOCK 


; READ AND SAVE CONTENTS OF PCSRO 
; GID WE GET A DNI INTERRUPT? 


; YES EXIT DELAY LOOP 
; NO, VISIT ORS FOR A a 


TRAP CS$BRK 
; HAS TIMER EXPIRED? 
; NOT YET 


; TURN OFF THE TIMER 
; PRINT TIMED OUT MESSAGE 


MOV SP ,RO 
TRAP CSPNTF 
ADD #4,SP 


PCSRO -> EPCSRO 
PCSR1 -> EPCSR1 
SET CARRY BIT 
GO EXIT 





EE SE LS 





ee ES 
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3301 030042 004737 033402’ JSR PC, TIMOFF ; TURN OFF THE TIMER 

3302 030046 000241 CLC ; DNI SET, SO CLEAR C BIT 

3303 030050 40S: 

3304 030050 012604 MOV (SP)+,R4 ; RESTORE R4 

3305 030052 012601 MOV (SP)+,R1 ; RESTORE R1 

3306 030054 012600 MOV (SP)+,RO ; RESTORE RO 

3307 030056 000207 RTS PC ; AND RETURN 


3309 030060 045 116 can INTMG1:.ASCIZ/SNSA DNI DID NOT SET PRIOR TO SOFTWARE TIMER TIME OUT./ 


3310 even 
32711 








—— ae 
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3313 pRRERREASEDERAAEAEESAREAEEEEAAREEEASEEEEEDEEAEEEEEEREEEERE EERE EE SEER EEE DS 
3314 ; 
ore ; SUBROUTINE - CKINTR 
: 
3317 ; THIS SUBROUTINE WILL INITIATE A WAIT LOOP, AND 
3318 : LOOK FOR THE INTERRUPT SUMMARY BIT TO SET. AS 
3319 : THIS ROUTINE IS USED EXCLUSIVELY TO WAIT FOR 
3320 : EITHER DNI, FATL, OR USCI BITS TO SET, ANY OTHER 
3321 : INTERRUPT BITS SETTING PRIOR TO THESE WILL BE 
cane : FLAGGED AS UNEXPECTED INTERRUPTS. 
; 
3324 : INPUTS: NONE 
3325 : 
3326 ; OUTPUTS: 
3327 : 
san ; CALLING SEQUENCE: JSR PC,CKINTR ; WAIT FOR INTERRUPT 
3330 SRREKERERAAEAAERREEEEEREAEEEEEREEAAEEEEEAE EE EE EERE SEES EEEAEE ESSERE EE EREES 
3331 
3332 030150 CKINTR: 
3333 
3334 030150 010046 MOV RO, -CSP) ; SAVE RO 
3335 030152 010146 MOV R1,-CSP) ; SAVE RL 
3336 020154 010446 MOV R4,-CSP)> ; SAVE R4 
3337 020156 012737 9002100 016602' MOV #2100, METER ; PUT ENOUGH TIME ON TIMER 
3338 030164 004737 033416’ JSR PC, TIMON ; TURN ON CLOCK 
3339 030170 017704 150030 10$: MOV @PCSRO,R4 ; READ AND SAVE PCSRO DATA 
3340 030174 032704 000200 BIT #INTR,R4 ; INTERRUPT OCCURRED? 
3341 030200 001004 BNE 20$ ; YES, DECODE IT 
3342 030202 BREAK ; NO, VISIT ORS 
030262 104422 TRAP CS$BRK 
3343 030204 005737 016602’ TST METER ; HAS TIMER EXPIRED? 
3344 030210 001367 BNE 10$ ; NO, LOOK AGAIN 
5 030212 20$: 
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3348 sRRESAESEAALESARAEAEREAEEEESESEEEEESALEREASEES ELSE SESE SESESEEEEAEAEEEEEEES 
3349 3 
3350 ' SUBROUTINE - CLRBUF 
1 ; 
3352 : THIS SUBROUTINE WILL CLEAR BOTH THE SOFTWARE BUFFERS NAMED 
3353 . RECEIVE BUFFER (RBUF) AND TRANSMIT BUFFER (TUF), BY CALLING 
3354 : IN SEQUENCE, SUBROUTINES ‘CLRCV’ AND ‘CLRXMT’. 
; 
3356 : INPUT: NONE 
3357 $ 
3358 OUTPUT: NONE 
3360 ; SUBSIDIARY ROUTINES: SUBROUTINES ‘CLRCV’ AND ‘CLRXMT’ 
3362 PARAMTERS MODIFIED: ON EXIT BOTH RBUF AND TBUF WILL BE CLEARED 
3364 ; CALL: JSR PC, CLRBUF 
; 
3366 sR RaRARREREREESA KE AEREREEEEESAEEERSERAREESESESESESEESAESESES ESSE SEES SESE SE EESEE 
3367 
3368 030212 CLRBUF : 
3369 030212 004737 030236’ JSR PC,.CLRCV ;CLEAR RECEIVE BUFFERS 
3370 030216 004737 030614’ JSR PC CLRXMT ;CLEAR TRANSMIT BUFFERS 
3371 080222 000207 RTS PC 
2 








2 nee, 


GLOBAL AREAS | MACRO Y0S.02 Friday 12-Jul-85 09:33 Page 33 SEQ 97 
GLOBAL MACRO AND SUBROUTINES SECTI 
3374 sSREEAESEREEEEESEAEEEASEEEEEEREEEEESEEEEAEDEEESESEESEAEEESESE SEES REEEEEEEEEE 
3375 3 
3376 ; SUBROUTINE - CLBYTE 
, 
3378 : THIS ROUTINE WILL CLEAR A NUMBER OF pYTes (NUMBER PASSED IN R4), 
3379 ; STARTING AT ADDRESS POINTED TO BY R 
n 
3381 ; INPUT - 3 POINTS TO STARTING ADDRESS OF BYTES 
3382 R4 CONTAINS NUMBER OF BYTES TO BE CLEARED 
3384 : OUTPUT: - NONE 
3385 
3386 . CALL: MOV @X,R3 sSTARTING ADDRESS OF BYTES 
3387 MOV #Y .R4 ;NUMBER OF BYTES TO BE CLEARED 
3388 JSR PC .CLBYTE ;CLEAR THE BYTES 
; 
3390 sRREREERASEASEAEREREEEREEEEEEAEEEEAEEEEEAESEAEEESESESSEEEEESEEEEEAEESESEESEES 
3391 
3392 030224 CLBYTE: 
3393 
3394 030224 1s: 
3395 030224 005304 DEC R4 
3396 020226 002402 BLT 2$ 
3397 020230 105023 CLRB ss: CRB)» 
3398 030232 000774 BR i$ 
3399 030234 2$: 
3400 030234 000207 RTS PC 





meee ee ml, et LL LLL LLL LLL LLL LL 
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3426 0302 
3427 030260 
3428 030262 
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36' 
030224 ' 


FR RREASSEASESRAEEEEEESESEEESAEAEEEESESESEAEESEEESEEEEEEESESESEOESESESEESEEEES 


SUBROUTINE - CLRCV 
— WILL CLEAR ALL LOCATIONS IN SOFTWARE BUFFER 


INPUT: NONE 
OUTPUT: NONE 

SUBSIDIARY ROUTINES: SUBROUTINE ‘CLBYTE’ 
CALL: JSR PC, CLRCV 


; 
> 
. 
3 
a 
a 
‘ 
» 
: 
° 
; 
: 
; 
a 
pREaREEARRERAAAREEE EA EKER EAEEALERELEEESEEAAEEEEEESSEESESESE ESSE ES ESESEESESE EE ES 


CLRCV: 
R3,-CSP) 


MOV (SP)+,R4 





LL LL LL! LLL LLL eeeeeeeeeree_ee 





Ee ee ee a cma 
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3430 
3431 sPRAAREARERAEAASEAEEEERAEEEAEEERESAEEEAS EERE DEED EEEEEEEEEEEREEEEEEEREEEES 
3432 ; 
a. ; SUBROUTINE - CLRONI 
: 
3435 ; THIS SUBROUTINE PERFORMS A WRITE ONE TO CLEAR OPERATION ON 
oone : THE DNI BIT AND VERIFIES ITS SUCCESS. 
; 
3438 ; INPUTS: NONE 
3439 ; 
3440 : OUTPUTS: IF SUCCESSFUL ( DNI = 0 ) 
3441 ; THEN CARRY = 0 
3442 ; 
3443 : IF UNSUCCESSFUL ( DONI = 1 ) 
3444 : THEN CARRY = 1 
3445 ; PCSRO -> EPCSRO 
3446 : PCSRi -> EPCSR1 
3447 ; 
3448 : CALLING SEQUENCE: 
3449 : JSR PC ,CLRONI 
3450 ; 
3451 SeRRAAAARASESAAREESERSEREEEEARESEEEAEEAE AAAS EESAEREEEE ESSE SEES SEEDED EE EDS 
3452 
3453 020264 CLRONI : 
3454 030264 010446 MOV R4,-CSP) ; SAVE R4 
3455 030266 017737 147732 000236' MOV @PCSRO ,PCSROC ; READ AND SAVE PCSRO DATA 
3456 030274 042737 173400 000236’ BIC 4173400, PCSROC ; MASK ALL UPPER BYTE EXCEPT DNI 
3457 030302 113777 000237' 147724 MOVB PCSROC +1, @PCSROUB ; CLEAR ONI 
3458 030310 017704 147710 MOV @PCSRO,R4 ; PCSRO -> R4 
3459 030314 032704 004000 BIT #DNI ,.R4 ; ONI = 0 ? 
3460 030320 001407 BEQ 10$ ; YES 
3461 030322 010437 016514’ MOV R4,EPCSRO ; NO, PCSRO -> EPCSRO 
3462 030326 017737 147674 016516‘ MOV @PCSR1,EPCSR1 ; PCSRi -> EPCSR1 
3463 030334 000261 SEC ; SET Y 
3464 030336 000401 BR 20$ 
3465 030340 000241 10$: cL_c ; CLEAR CARRY 
3466 030342 012604 20$: MOV CSP)+,R4 ; RESTORE R4& 
3467 030344 000207 RTS PC ; AND RETURN 





ne 
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3469 f SSSESASESEKESEEEEESESESASESAEEESEEEESEEELESEEESEEEEEEEES £6646464646466464664464646464 


3470 ; 
Soak ; SUBROUTINE - CLINTR 
$ 
3473 : THIS SUBROUTINE CLEARS LOWER BYTE OF PCSRO (DISABLE INTERRUPTS), 
3474 ; THEN SAVES PCSRO DATA. IT THEN WRITES UPPER BYTE OF SAVED DATA 
3475 ; TO THE UPPER BYTE CF PCSRO IN ORDER TO CLEAR ANY INTERRUPT BITS 
oo : (WRITE 1 TO CLEAR), THAT HAVE BEEN PREVIOUSLY SET. 
; 
3478 ; INPUTS: NONE 
3479 ; 
3480 ; OUTPUTS: NONE 
3481 ; 
aoae ; CALLING SEQUENCE: JSR PC ,CLINTR 
3484 PTT TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTIT TTT TTT Tit ttt ttt ieee 
3485 
3486 030346 CLINTR: 
3487 030346 017737 147652 000236’ MOV @PCSRO , PCSROC ;SAVE PCSRO DATA 
3488 030354 113777 000237' 147652 MOVB PCSROC +1, @PCSROUB 
3489 ;CLEAR STATUS BITS IN PCSRO UPPER BYTE 
aeet 030362 000207 RTS PC 





SEQ 100 








OO al 
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3493 3 £$6 6666 666606666640 66 606666 666466404666606 666444 6646646664646666646 646 646466 4% ‘SH O6EES 


3494 ; 
tm ; SUBROUTINE - CLRRCE 
: 
3497 : THIS SUBROUTINE PERFORMS A WRITE ONE TO CLEAR OPERATION ON 
oan : THE RCBI BIT AND VERIFIES ITS SUCCESS. 
: 
3500 ; INPUTS: NONE 
3501 : 
3502 : OUTPUTS: IF SUCCESSFUL € RCBI = 0 ) 
3503 : THEN CARRY = 0 
3504 $ 
3505 : IF UNSUCCESSFUL ( RCBI = 1 ) 
3506 ; THEN CARRY = 1 
3507 : PCSRO -> EPCSRO 
3508 : PCSRi -> EPCSR1 
3509 ; 
3510 : CALLING SEQUENCE: 
a : : JSR PC ,CLRRCE 
: 
35123 SRREEEREASEEEEERAEREEEEEAEEEEEEEES EDEEEEEEEEES SESE SEES EE EERE EEEEEEEEEEEES 
3514 
3515 030364 CLRRCE: 
3516 020364 010446 MOV R4,-CSP> ; SAVE R4 
3517 030366 112777 000004 147640 MOVB ORCBIB , @PCSROUB ; WRITE ONE TO CLEAR RCBI BIT 
3518 030374 017704 147624 MOV @PCSRO ,R4 ; PCSRO -> R4 
3519 030400 032704 002000 BIT @RCBI,R4 ; RCBI = 0 ? 
3520 030404 001407 BEQ 10$ ; YES 
3521 030406 010437 016514' MOV R4,EPCSRO ; NO, PCSRO -> EPCSRO 
3522 030412 017737 147610 016516’ MOV @PCSR1.EPCSR1 ; PCSRi -> EPCSRi 
3523 030420 000261 SEC ; SET CARRY 
3524 030422 000401 BR 20$ 
3525 030424 000241 10$: CLC ; CLEAR CARRY 
3526 030426 012604 20$: MOV (SP)+,R4 ; RESTORE R4 
3527 030430 000207 RTS PC ; AND RETURN 








ie 
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3529 
aoee j RARE REEEESEEES SE SEREEESEEAEEEEEAREEADEEEEEEEEEESEEEEESEE DEES SEED EE EEEES 
1 ; 
aaae : SUBROUTINE - CLRRXI 
: 
3534 : THIS SUBROUTINE PERFORMS A WRITE ONE TO CLEAR OPERATION ON 
acne : THE RXI BIT AND VERIFIES ITS SUCCESS. 
; 
3537 : INPUTS: NONE 
3538 : 
3539 : OUTPUTS: IF SUCCESSFUL ( RXI = 0 ) 
3540 ; THEN CARRY = 0 
3541 : 
3542 : IF UNSUCCESSFUL ( RXI = 1 ) 
3543 3 THEN CARRY = 1 
3544 3 PCSRO -> EPCSRO 
3545 : PCSRi -> EPCSR1i 
3546 ; 
3547 ; CALLING SEQUENCE: 
3548 : JSR PC ,CLRRXI 
3549 ; 
3550 sRERREEAERERELADEESEESEEEESEAEEEEEEEED ES ED SEOEES OSES EE EEEEEEESEEEEEEEE EES 
3551 
3552 020432 CLRRXI: 
3553 030432 010446 MOV R4,-CSP) ; SAVE R4 
3554 030434 112777 000040 147572 MOVB @RXIB , BPCSROUB ; WRITE ONE TO CLEAR RXI BIT 
3555 030442 017704 147556 MOV @PCSRO,.R4 ; PCSRO -> R4 
3556 030446 032704 020000 BIT ORXI .R4 : 
3557 030452 001407 BEQ 10$ ; 
3558 030454 010437 016514' MOV R4,EPCSRO : 
3559 030460 017737 147542 016516’ MOV @PCSR1 ,EPCSR1 ; 
3560 030466 000261 SEC 3 
3561 030470 000401 eR 20$ 
3562 030472 000241 10$: cLC ; 
3563 030474 012604 20$: MOV (SP)+,R4 : 
3564 030476 000207 RTS PC 3 








ee TT 
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GLOBAL AREAS 











SEQ 103 


GLOBAL MACRO AND SUBROUTINES SECTI 


3601 030544 





CLRTXI: 
R4,-C(SP) ; SAVE R4 
000020 147524 MOVE oTXIB , BPCSROUB ; WRITE ONE TO CLEAR TXI BIT 
147510 MOV CSRO ,R4 ; PCSRO -> R4 
010000 BIT @TXI ,R4 ; TXI = 0? 
BEQ 10$ ; YES 
016514' MOV R4 ,EPCSRO ; NO, PCSRO -> EPCSRO 
147474 016516' MOV @PCSR1.EPCSR1 ; PCSRi -> EPCSR1 
SEC ; SET CARRY 
BR 20% 
10$: CLC ; 
20%: MOV (SP)+,R4 3 
RTS PC ; 


SSSA EEEKEEEEEE EE EEEEESEEESEDEEEEEESEDEEESEEEEEESEEESESEEESEEEEESEEEEESESE 


SUBROUTINE - CLRIXI 


THIS SUBROUTINE PERFORMS A WRITE ONE TO CLEAR OPERATION ON 
THE TXI BIT AND VERIFIES ITS SUCCESS. 


INPUTS: NONE 
OUTPUTS: IF SUCCESSFUL ( TXI = 0 ) 
THEN CARRY = 0 
IF UNSUCCESSFUL ( TXI = 1 ) 
THEN CARRY = 1 


PCSRO -> EPCSRO 
PCSRi -> EPCSR1 


CALLING SEQUENCE : 
JSR PC ,CLRTXTI 


> 
‘ 
: 
> 
‘ 
; 
; 
& 
‘ 
‘ 
‘ 
‘ 
; 
3 
‘ 
‘ 
i 
‘ 
é 
50666400608 44664664605 06466 646 666666666866 66686866 6466666466 646466 4686646666468 466 








ne ee A maT reel 
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3603 6666666660606 066066 08 666046060646 06 064006 000060000008 06 06000000000000886 
3604 
3605 ; SUBROUTINE - CLRSER 
3606 $ 
3607 ; THIS SUBROUTI"E PERFORMS A WRITE ONE TO CLEAR OPERATION ON 
3608 : THE SERI BIT AND VERIFIES ITS SUCCESS. 
3609 | 
3610 ; INPUTS: NONE 
3611 ; 
3612 : OUTPUTS: IF SUCCESSFUL ( SERI = 0 ) 
3613 ; THEN CARRY = 0 
3614 $ 
3615 : IF UNSUCCESSFUL ( SERI = 1 ) 
3616 : THEN CARRY = 1 
3617 ; PCSRO -> EPCSRO 
3618 ; PCSRi -> EPCSR1 
3619 ; 
3620 ; CALLING SEQUENCE : 
beets ; JSR PC ,CLRSER 
$ 
3623 jeohShhh hs 66064666660 $06000 00066646 006040060606 6606 665664664060 4008 0608008 
3624 
3625 030546 CLRSER: 
03 010446 MOV R4,-CSP> ; SAVE R4 
3627 030550 112777 000200 147456 MOVB #SERIB , @PCSROUB ; WRITE ONE TO CLEAR SERI BIT 
3628 030556 017704 147442 MOV @PCSRO ,.R4 3; FCSRO -> R4 
9 030562 032704 100000 BIT #SERI,R4 ; SERI = 0 ? 
3630 030566 001407 BEQ 10$ ; YES 
3631 030570 010437 016514’ MOV R4,EPCSRO ; NO, PCSRO -> EPCSRO 
3632 030574 017737 147426 016516’ MOV @PCSR1 ,EPCSR1 ; PCSRi -> EPCSR1 
3633 030602 61 SEC ; SET CARRY 
3634 030604 01 BR 20% 
3635 030606 000241 10$: CLC ; CLEAR CARRY 
3636 030610 012604 208: MOV CSP)+,R4 s RESTORE R4 
3637 930612 000207 RTS PC ; AND RETURN 





A 
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030614 
030614 
030616 
030620 
030624 
020630 
020634 
030636 
030640 





a TT 
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010346 
010446 
012703 
013704 
004737 
012604 
012603 
000207 


002436' 
002434' 
030224' 


sPSSESEAEAESESEREAEEESES ESSE EEESEEEEEEEEEEEEEEEEEEEEEEEDEESEEEEESEEESEEEES 


CLRXMT: 


SUBROUTINE - CLRXMT 


THIS SUBROUTINE WILL CLEAR ALL LOCATIONS IN SOFTWARE BUFFER 


‘TBUF’. 
INPUT: 
OUTPUT: 


NONE 
NONE 


SUBSIDIARY ROUTINES: SUBROUTINE CLBYTE 


CALL: 


JSR PC ,CLRXMT 


R3,-(SP) 

R4,-CSP) 

@TBUF RS 

TBUF -2,R4 
PC ,CLBYTE 
CSP)+,R4 

(SP)+,R3 

PC 





SEQ 105 


PTT TTTTTTTTTTTTTITITITI TTT TT TT TTT lilt 





~ ee EN a meen eee 
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GLOBAL MACRO AND SUBROUTINES SECTION 


030642 


030710 
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016574' 


016570° 


sSERERAAESESEAEEEEAREEEEEEEESESESEESEEEEEEEEEEESEAEEEEEASEEEEEEEESEEEESEESE 


CMPCRC: 


10$: 


20$: 


SUBROUTINE - CMPCRC 
THIS SUBROUTINE COMPARES A CRC VALUE WITH 


AN EXPECTED CRC VALUE. 
RS = ADDRESS OF ACTUAL CRC VALUE RECEIVED. 


INPUTS: 


INPLICIT INPUTS: 


OUTPUTS: 


CALLING SEQUENCE: 
JSR PC ,CMPCRC 


e RERERASACASSSALALESESCEESSARECEAERALARALESEESEEAESESASLALEESSESEAEEELALESE SLE 


TT 


XCRC = EXPECTED CRC VALUE 


IF SUCCESSFUL CRC COMPARE 
THEN CARRY = 0 


IF UNSUCCESFUL CR 
THEN 


R3, -(SP) 
R4,-CSP) 
#xXCRC,RS 

RS .R4 
CR3)+,CR4)> 


10$ 
CR3)+,CR4)+ 
10$ 


20$ 
S€CRC.RS 
R4 


RS, 
(R4)+,CR3)+ 
C(R4)+,CR3)+ 


(SP)+,R4 
(SP)+,R3 
PC 


C COMPARE 


CARRY = 1 
EXPECTED CRC = XCRC 


ACTUAL CRC 


-> ECRC 


SAVE RS 
SAVE R4 
R3 POINTS TO EXPECTED CRC 
R4 POINTS TO ACTUAL CRC 

FIRST CRC WORD COMPARE ? 


NO 
oe CRC WORD COMPARE ? 
YES, CLEAR CARRY 


POINT TO ERROR TABLE 
POINT TO ACTUAL DATA 
LOAD ECRC TABLE 


AND SET CARRY 
RESTORE R4 
RESTORE R3 
AND RETURN 





SEQ 106 


SEQ 107 
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GLOBAL MACRO AND SUBROUTINES SECTION 


3714 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 
3723 
3724 
3725 
3726 


030712 
020712 
030714 
030716 
030720 
030722 
030726 
030732 
030734 
030736 
030740 
030742 
030744 
030750 
030754 
030756 
030760 
030762 
030764 
030766 
030770 
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002454 ' 
006456 ' 


016566‘ 
016564‘ 


sRASEEESAAACESEEASEERAAEEAEEEEEEEEEAEAEEEAEASEREOHSEEHSEEEESEEAEEEEEESEEES 


SUBROUTINE - CMPDAT 


THIS SUBROUTINE COMPARES THE RECEIVE BUFFER C(RBUF) DATA FIELD 
WITH THE TRANSMIT BUFFER (TBUF) DATA FIELD. 


RS = NUMBER OF WORDS TO COMPARE 


IF SUCCESSFUL DATA COMPARE 
THEN CARRY = 0 


IF UNSUCCESSFUL DATA COMPARE 


CMPDAT : 


10$: 


30$: 
40$: 


INPUTS: 
OUTPUTS: 


CALLING SEQUENCE: 
JSR 


RO, -CSP) 


@RBUF +14. ,R4 
CR3)+,CR4)+ 
20$ 


RO 
10$ 
30$ 
-(R4), EDAT 
40$ 


(SP)+,R4 
(SP)+,R3 
CSP)+,RO 
PC 


THEN CARRY = 1 

EXPECTED DATA -> XDAT 

ACTUAL DATA -> EDAT 
PC ,CMPDAT 


sKKRRRKAAASARACAALAAAAAARAAKAAAALEEASALASALALESESESABESAESESALALALALCLALES ELSE 


SAVE RO 

SAVE R3 

SAVE R4 

RO = NUMBER OF WORDS TO COMPARE 
R3 POINTS TO EXPECTED DATA 

R4 POINTS TO ACTUAL DATA 

DATA COMPARE ? 


NO 
YES, DONE ? 
NO 


YES 

SAVE EXPECTED DATA 
SAVE ACTUAL ERROR DATA 
SET CARRY 


CLEAR CARRY 
RESTORE R4 
RESTORE R3 
RESTORE RO 
AND RETURN 








GLOBAL AREAS 
GLOBAL MACRO AND SUBROUTINES SECTION 


020772 
030772 


031050 


002436' 
006440' 


016566' 
016564 ' 


as 
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SEQ 108 


sSSEEAESRSESASESESEEEEEREEEEAEEAREAEESEEEAEEEEEEEEEEASEEEAEAEEEAEESEEEEEESS 


CMPMEM : 


10$: 


30$: 


SUBROUTINE - CMPMEM 


THIS SUBROUTINE COMPARES THE READ MEMORY BUFFER CRBUF ) 
WITH THE WRITE MEMORY BUFFER CTBUF). 


INPUTS: RS = NUMBER OF WORDS 70 COMPARE 


OUTPUTS: IF SUCCESSFUL DATA COMPARE 
THEN CARRY = 0 


IF a tiene SATA COMPARE 
EXPECTED” DATA -> XDAT 


CALLING ——! 


ACTUAL DATA 


PC ,CMPMEM 


-> EDAT 


 pdeeeeeedasadasedsabeasacsasenensasesesscnsncesessesesessssesessesesesss 


MOV RO,-CSP) ; SAVE RO 

MOV R3,-CSP) ; SAVE R3 

MOV R4,-CSP) ; SAVE R4 

MOV R5,RO ; RO = NUMBER OF WORDS TO COMPARE 
MOV @TBUF ,R3S ; R3 POINTS TO EXPECTED DATA 
MOV @RBUF ,R4 ; R&4 POINTS TO ACTUAL DATA 
CMP CR3)+,CR4)+ ; DATA COMPARE ? 

BNE 20$ ; NO 

DEC RO ; YES, DONE ? 

BNE 10$ ; NO 

BR 30$ ; YES 

MOV -C€R3), XDAT ; SAVE EXPECTED DATA 

MOV -(R4), EDAT ; SAVE ACTUAL ERROR DATA 
SEC ; SET CARRY 

BR 40$ 

CLC ; CLEAR CARRY 

MOV (SP)+,R4 ; RESTORE R4 

MOV CSP)+,R3 ; RESTORE RS 

MOV (SP)+,RO ; RESTORE RO 

RTS PC ; AND RETURN 





AS HC Te 


MACRO YOS.v- 
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GLOBAL M.CRO AND SUBROUTINES SECTION 


000000 
006532’ 


016566’ 
016564’ 


fs SRESREAEEEEEA SEES EEESESEEEEEESEREESEEEEEEEEEESEEEAEEEEEEEEEESESESEEAGEDESE 


10$: 


20$: 


30$: 
40$: 





—_—_ ae 
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SUBROUTINE - CMPRNT 


THIS SUBROUTINE COMPARES THE RECEIVE BUFFE? (RBUF) DATA FIELD 


TO VERIFY ZERO PADDING HAS OCCURED. 


INPUTS: 
OUTPUTS: 


RS = NUMBER OF WORDS TO COMPARE 


IF SUCCESSFUL DATA COMPARE 
THEN CARRY = 0 


IF UNSUCCESSFUL DATA COMPARE 
THEN CARRY = 1 
EXPECTED DATA -> XDAT 
ACTUAL DATA 


CALLING — 


PC ,CMPRNT 


RO, -(SP) 
R3,-CSP) 
R4, -(SP) 


RS ,RO 
#ZERO,R3 
#RBUF +58. ,R4 
R3,CR4)+ 

20$ 


RO 

10$ 

30$ 
R3,XDAT 
-C(R4),EDAT 
40$ 
(SP)+,R4 


(SP)+,R3 
(SP)+,RO 
PC 


; SET 


-> EDAT 


=e RaRKKARAESSEALASEELARARALESEESSSAESESRESAEEEAEAESEAESEAEEASSEASESEASESESREAEEE SLEDS 


YES 
SAVE EXPECTED DATA 
SAVE ACTUAL ERROR DATA 


CARRY 


CLEAR CARRY 
RESTORE R4 
RESTORE RS 
RESTORE RO 


RETURN 


OF WORDS TO COMPARE 
R3 IS EXPECTED DATA (ZERO’S) 

R4 POINTS TO ACTUAL DATA 

DATA = ZERO’S ? 


NO 
YES, DONE ? 
NO 





SEQ 109 





_ —_ zzz essrssssssmasassaaalls st CLL LLL LLL LLL 
SEQ 110 
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3a49 
3850 sRRRRREREREAASEEEERERESEEEEAEEEESESAREEAEEEAEAEAEE SEES ED EEESEEEE EEE EEEEEEEES 
3851 ; 
en $ SUBROUTINE - DELAY 
: 
3854 ; THIS SUBROUTINE WILL USE THE SYTEM CLOCK TO ENABLE A WAITING 
aaa ; PERIOD DETERMINED BY THE VALUE PASSED IN R4. 
: 
a ; INPUT: R4& CONTAINS DELAY VALUE 
; 
3859 ; OUTPUT: NONE 
3860 : P 
3861 : CALL: MOV @DELAY _VALUE ,R4 
3862 ; JSR PC ,.DELAY 
3863 : 
3864 [Rah aheeRHREEREEREEEEREEEEEE AS EEEAEEEEAEEAEAEAEEEE ESSE EERE EERE SE EEEE EE ES EEES 
3865 
3866 031132 DELAY: 
3867 031132 010437 016602’ MOV R4 METER ;GET DELAY VALUE 
3868 031136 004737 033416’ JSR PC, TIMON ;START DELAY 
3869 031142 i$: BREAK ;VISIT DRS WHILE WAITING 
031142 104422 TRAP CSBRK 
3870 031144 005737 016602’ TST METER ;F INISHED? 
3871 021150 001374 BNE i$ ;CONTINUE WAIT 
3872 031152 004737 033402' JSR PC , TIMOFF ; TURN OFF SYSTEM CLOCK 
are 031156 000207 RTS PC ;RETURN TO CALLING ROUTINE 
3875 ao 





eee mmm et LLL LEE LL 
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3877 
3878 fs SSREEEESEESEAESERSEEESE SESE EEEASESEAEEEEEEEEEEEEEEEEEEEESESEESESEAEEEEEEEEEES 
3879 
3880 ; SUBROUTINE - GETCRC 
; 
3882 ; THIS SUBROUTINE IS A BYTE WISE 32-BIT CRC CALCULATOR 
3884 ; INPUTS: RS CONTAINS NEW BYTE TO ADD TO CRC 
3885 ; R3.R4 CONTAIN CURRENT PARTIAL CRC CODE 
; 
3887 IMPLICIT INPUTS: POLYH = CRC FUNCTION POLYNOMIAL HIGH WORD 
3888 POLYL = CRC FUNCTION POLYNOMIAL LOW WORD 
3890 ; OUTPUTS: R3,R4 CONTAIN UPDATED CRC 
; 
3892 ; CALLING SEQUENCE: MOVB  (R1)+,R5 ;GET NEXT BYTE 
3893 JSR PC,GETCRC ;CALCULATE CRC 
; 
3895 fRARERREAAERESASREAREAEEEEESEAESESERESALELRAEESE SEES ELSES EEES SES EEAESE SESE EE SES 
3896 
3897 031160 GETCRC: 
3898 031160 010146 MOV R1,-(SP) ;SAVE Ri 
3899 031162 010246 MOV R2,-(SP) ;SAVE R2 
3900 021164 010546 MOV RS, -(SP) ;SAVE RS 
3901 031166 042705 177400 BIC 80377 ,RS ;CLEAR HIGH BYTE 
3902 031172 074504 XOR cR4 sMERGE NEW BYTE WITH OLD CRC 
3903 031174 013701 016614: MOV POLYH, Ri sGET CRC POLYNOMIAL HIGH WORD 
3904 031200 013702 016616’ MOV POLYL.R2 ;GET CRC POLYNOMIAL LOW WORD 
3905 031204 012705 000010 MOV #8. RS ;LOOP COUNT 
3906 031210 is: 
3907 031210. 000241 cLC ;CLEAR THE CARRY 
3908 031212 006003 ROR R3 ;SHIFT RIGHT THE CRC 
3909 031214 ROR R4 ;32 BITS WORTH 
3910 031216 103002 BCC 2$ ;SKIP IF BIT 0 NOT SET 
3911 031220 074103 XOR R1.R3 ;EXCLUSIVE OR IN THE POLY 
3912 031222 074204 XOR R2.R4 ;BOTH HIGH AND LOW WORDS 
3913 031224 2$: 
3914 031224 077507 SOB R5,18 ;AND LOOP ON ALL 8 BITS 
3915 031226 012605 MOV (SP)+,R5 ;RESTORE R5 
3916 031230 012602 MOV (SP)+,R2 ;RESTORE R2 
3917 031232 012601 MOV (SP)+,R1 :RESTORE R1 
3918 031234 000207 RTS pc SRETURN TO CALLING PROGRAM 





GLOBAL AREAS 


3 

3941 031236 
3942 031236 
3943 031240 
3944 021242 
3945 

3946 031244 
3947 031250 
3948 031254 


3949 

3950 031260 
3951 931264 
3952 031270 
3953 031274 
3954 031300 
3955 031304 
ore 031306 


395 

3958 031310 
3959 031312 
3960 031314 
3961 031316 
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000006 
102247’ 
102154’ 


102202' 
031320' 
102203 ' 
031356’ 
102203 ' 


22 a 
SEQ 112 


5 POSSESSES EEESEESESEAESEEEEESESEEEEEEEEEAEESEEEEEESEEEEEEEEEEESEEEEEESEEE 


; 
; SUBROUTINE - HEXDPA 
; 
; THIS SUBROUTINE LOADS DEFADR WITH THE ASCII HEX VALUE 
: FOR THE DEFAULT PHYSICAL ADDRESS DPA. 
; 
; INPUTS: NONE 
. 
3 IMPLICIT 
INPUTS: OPA = DEFAULT PHYSICAL ADDRESS 
‘ 
; OUTPUTS: DEFADR = ASCII HEX VALUE FOR DPA 
' CALLING SEQUENCE: 
; PC ,HEXDPA 
FREE n,n ti aE 
HEXDPA: 
MOV RO, -(SP) ; SAVE RO 
MOV R3,-(SP) ; SAVE R3 
MOV RS, -(SP) ; SAVE RS 
: MOV #6 ,RO ; DO LOOP = 6 BYTES 
MOV #DEF ADR, R3 ; POINT TO ASCII MESSAGE 
MOV #DPA,RS ; POINT TO DEFAULT PHYSICAL ADDR 
; 
10$:  MOVB  (RS5S)+,HEXDAT ; LOAD BYTE FOR CONVERSION 
JSR PC ,HEXH ; CONVERT HIGH NIBBLE 
MOVB § HEXVAL,C(R3)+ ; LOAD INTO ASCII MESSAGE 
JSR ,HEXL ; CONVERT LOW NIBBLE 
VB - HEXVAL,(R3)- ; LOAD INTO ASCII MESSAGE 
STB —s- (RB) ; SKIP OVER HYPHEN IN MESSAGE 
SOB RO,10$ ; LOOP TILL ALL 6 BYTES ARE DONE 
; 
MOV (SP)+,RS ; RESTORE RS 
MOV (SP)+,R3 ; RESTORE R3 
MOV (SP)+.RO ; RESTORE RO 
RTS Pc ; AND RETURN 





cee eel ce LL LLL LLL LLL 
SEQ 113 
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3963 
2964 SSS EKEESEEESEEAEESESEEESESE SESE SEEEAEEAECEEEEEES 644464664 44464464464446446446466 
3965 8 
3966 ; SUBROUTINE - HEXK 
; 
3968 : THIS SUBROUTINE LOADS HEXVAL WITH THE ASCII HEX VALUE 
3969 ; FOR THE HIGH NIBBLE IN HEXDAT 
* 
3971 ; INPUTS : NONE 
3972 3 
3973 ; IMPLICIT 
3974 ; INPUTS: HEXDAT = BYTE TO BE CONVERTED 
; 
3976 ' OUTPUTS: HEXVAL = ASCII HEX VALUE FOR THE HIGH NIBBLE 
3978 CALLING SEQUENCE: 
3979 ; JSR PC ,HEXH 
3980 : 
3981 3 SEKRAKARESKSARASAEASSSASESASESASASEASSEELESASESESEALESAELESLSESESLESAE SESSA EEDES 
3982 
3983 031320 HE XH: 
3984 031320 010146 MOV R1,-(SP) ; SAVE RI 
3986 021322 013701 102202' : MOV HEXDAT RL ; LOAD DATA FOR CONVERSION 
3987 031326 042701 177417 BIC #177417,R1 ; MASK HIGH NIBBLE 
? 
3989 031332 006201 ASR Ri ; SHIFT RIGHT 
3990 031334 006201 ASR Ri 
3991 031336 006201 ASR Ri 
3992 031340 006201 ASR Ri 
é 
3994 031342 062701 102273' ADD @HEXTBL RI ; GET INDEX INTO HEXTBL 
3995 031346 111137 102203' MOVB (R11). HEXVAL ; AND LOAD HEXVAL 
7 
3997 031352 012601 MOV (SP)+,R1 ; RESTORE Ri 
3998 031354 000207 RTS PC ; AND RETURN 
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4000 
4001 sRRRERASEEEAEERESAAEEEEEREAEEAEEEASAEESAEEEEEDEEEEEEEEE EEE EAEE ODED REESE SES 
4002 ; 
pea ; SUBROUTINE - HEXL 
8 
4005 ; THIS SUBROUTINE LOADS HEXVAL WITH THE ASCII HEX VALUE 
cant ; FOR THE LOW NIBBLE IN HEXDAT 
; 
4008 ; INPUTS: NONE 
4009 ; 
4010 ; IMPLICIT 
pee : INPUTS: HEXDAT = BYTE TO BE CONVERTED 
3 
pee 3 OUTPUTS: HEXVAL = ASCII HEX VALUE FOR THE LOW NIBBLE 
$ 
4015 : CALLING SEQUENCE: 
4018 WUTTTTTTIT TTT T TT TT TTT Tit tri 
4019 
4020 031356 HE XL : 
pee 031356 010146 MOV R1,-CSP) ; SAVE Ri 
3 
4023 021360 013701 102202’ MOV HEXDAT ,R1 ; LOAD DATA FOR CONVERSION 
pa 031364 042701 177760 BIC #177760,R1 ; MASK LOW NIBBLE 
; 
4026 031370 062701 102273' ADD #HEXTBL ,R1 ; GET INDEX INTO HEXTBL 
pee i 031374 111137 102203' MOVB (R11), HEXVAL ; AND LOAD HEXVAL 
: 
4029 031400 012601 MOV CSP)+«,R1 ; RESTORE Ri 
4030 031402 000207 RTS PC ; AND RETURN 








TT nm 


SEG 115 
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4032 
4033 SORES EASESESESEEEESEEEASEEEEEASEEESSEESEEAEEEESEESE $464644646444646464644646464666666646 
4034 ; 
pe ; SUBROUTINE - LDBUF 
3 
4037 : THIS SUBROUTINE LOADS TBUF WITH AN ADDRESS DATA PATTERN 
pre ; STARTING WITH THE ADDRESS POINTED TO BY RS 
; 
poe ; INPUTS: RS = ADDRESS OF SPECIFIED DATA ADDRESS 
; 
onan ; OUTPUTS: TBUF = ADDRESS DATA PATTERN 
: 
4044 ; CALLING SEQUENCE: 
4045 ; JSR PC ,LOBUF 
4046 ; 
4047 pRaaRARERERAEAEAEAEKEEESESASEEEASERESEREEEEAEEEASEAEESSEESEASESEAEESEASESESEESESE 
4048 
4049 031404 LDBUF : 
4050 031404 010146 MOV Ri,-(CSP) ; SAVE Ri 
4051 031406 010346 MOV R3,-CSP) ; SAVE R3 
4052 031410 010446 MOV R4,-CSP) ; SAVE R4 
4053 031412 012701 002000 MOV #1024. ,R1 ; DO 1024. WORDS 
4054 031416 011504 MOV CR5), ; R&4 = STARTING DATA ADDRESS 
4055 031420 012703 002436‘ MOV #TBUF ,R3 ; R3 POINTS TO TBUF 
4056 031424 010423 10$: MOV R4,CR3)+ ; LOAD TBUF 
4057 031426 062704 000002 ADD #2 ,R4 ; ADD 2 TO DATA 
4058 031432 00530 DEC Ri ; DONE 1K BLOCK ? 
4059 031434 001373 BNE 10$ ; NO 
4060 031436 012604 MOV (SP)+,R4 ; RESTORE R4 
4061 031440 012603 MOV (SP)+,R3 ; RESTORE R3 
4062 031442 012601 MOV (SP)+,R1 ; RESTORE R1 
4063 031444 000207 RTS PC ; AND RETURN 





Ee 





GLOBAL AREAS MACRO YOS.02 Friday 12-Jul-85 09:33 Page 52 SEQ 116 
GLOBAL MACRO AND SUBROUTINES SECT TON 
4065 
4066 sSRRRESEERES SEES SESESE EE SAEEEEEEEEESEEEEEE SEEDED EEEEEEEDEDEEEEEEEEEE SEES 
4067 ; 
po : SUBROUTINE - LOBUFC 
3 
4070 3 THIS SUBROUTINE LOADS TBUF WITH THE COMPLIMENT OF AN 
aan ; ADDRESS DATA PATTERN STARTING WITH THE ADDRESS SPECIFIED BY RS 
$ 
pont ; INPUTS: RS = ADDRESS OF SPECIFIED DATA ADDRESS 
: 
yo ; OUTPUTS: TBUF = COMPLIMENTTED ADDRESS DATA PATTERN 
; 
4077 ; CALLING SEQUENCE: 
4078 ; JSR PC ,LDOBUFC 
4079 ; 
4080 Seah EREEEE ES DEED DEED EEEEEEESEEDDED ODES EEEESSOEEEEEEDEEEEEEEEEDESEEEEESS 
4061 
4082 031446 LDOBUFC: 
4083 031446 010146 MOV R1i,-CSP) ; SAVE Ri 
4084 031450 010246 MOV R2,-CSP) 3 SAVE R2 
4085 031452 010346 MOV R3,-CSP) ; SAVE RS 
4086 031454 010446 MOV R4,-CSP) ; SAVE R4 
4087 031456 012701 002000 MOV #1024. ,R1 ; DO 1024. WORDS 
4088 031462 011504 MOV CR5),R4 ; R&4 = STARTING DATA ADDRESS 
4089 031464 012703 002436’ MOV @TBUF RS ; R3 POINTS TO TBUF 
4090 031470 010402 10$: MOV R4,R2 
4091 031472 005102 COM R2 ; COMPLIMENT DATA 
4092 031474 010223 MOV R2,CR3)>+ ; LOAD TBUF 
4093 031476 062704 000002 ADD #2 ,.R4 ; ADD 2 TO DATA 
4094 031502 005301 DEC Ri ; DONE 1K BLOCK? 
4095 031504 001371 BNE 10$ ; NO 
4096 031506 012604 MOV CSP)+,R4 ; RESTORE R4 
4097 031510 012603 MOV CSP)+,R3 ; RESTORE RS 
4098 031512 012602 MOV (SP)+,R2 ; RESTORE R2 
4099 031514 012601 MOV (SP)+,R1L ; RESTORE Ri 
4100 031516 000207 RTS PC ; AND RETURN 
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atae 3 6O666 664640666666 66646646 6664466 666666 6604666666666 666666466 666646666466 466646646668 
7 
pre ; SUBROUTINE - LDOBUFR CUSED IN ADDRESS TESTS) 
; 
4106 $ THIS ROUTINE SETS UP THE TRANSMIT AND RECEIVE BUFFERS. THE 
4107 ; NUMBER OF BYTES IN A PACKET IS DETERMINED BY THE CONTENTS 
4108 3 PASSED IN ‘BYTCNT’. IN ANY CASE, A PACKET LENGHT WILL BE NO 
ee $ MORE THAN 32 BYTES, OR 36 INCLUDING CRC IF ‘DOCRC’ SET. 
; 
4111 $ A. LOAD TRANSMIT BUFFER TBUF CDEST. ADDR,SOURCE ADDR, TYPE ,.DATA) 
rt ; B. APPEND CRC IF ‘DOCRC’ FLAG SET 
: 
4114 : INPUTS: DOCRC = O THEN NO CRC 
4115 : i THEN CALCULATE CRC AND APPEND 
site ; BYTCNT= @ OF DATA BYTES IN PACKET 
H 
4118 ; IMPLICIT INPUTS: 
ake : DEST: = DESTINATION ADDRESS 
} 
4121 ; OUTPUTS: 
Pr ; TBUF IS SET UP FOR TRANSMIT 
é 
rr : PARAMETERS MODIFIED: ‘DOCRC’' WILL ALWAYS BE CLEARED ON EXIT 
é 
4126 : CALLING SEQUENCE: 
athe ; INSURE ‘DOCRC’ FLAG CONTAINS CORRECT DATA 
? 
4129 : MOV #X,R3 ;CRC LOW WORD 
4130 ; MOV #Y .R4 ;CRC HIGH WORD 
4131 ; MOV #Z,BYTCNT ;NUMBER OF BYTES THIS PACKET 
aaah ; JSR PC ,LOBUFR 
3 
athe 3 $22604464648464 £666 4668606066466 660464666 646446 66466466666 66466486866 66466666668% 
41 
4136 031520 LOBUFR : 
4137 031520 010046 MOV A} ; SAVE RO 
4138 031522 010146 MOV Ri, -CSP) ; SAVE Ri 
4139 031524 010246 MOV » ~ (SP ; SAVE R2 
4140 031526 010346 MOV R3,-CSP) 3; SAVE R3 
4141 031530 010446 MOV R4,-(SP) ; SAVE R4 
arse 931532 10546 MOV RS, -CSP ; SAVE RS 
ajaa ;SET UP TRANSMIT BUFFER TBUF 
re ;LOAD DESTINATION ADDRESS 
4147 031534 012705 000256‘ MOV @DEST,.RS ; POINT TO DESTINATION ADDRESS 
4148 031540 012701 002436' MOV @TBUF ,R1 ; POINT TO TBUF 
4149 031544 012521 MOV (R5)+, CR1ID+ ; LOAD DESTINATION ADDRESS 
4150 031546 012521 MOV CR5)+¢,(R1)+ 
eran 031550 011521 MOV CRS). CRI D+ 
sake ;LOAD SOURCE ADDRESS 
4155 031552 012705 000264’ MOV @SRC RS ; LOAD FOR LATER COMPARISON 
4156 031556 012521 MOV (R5)¢,CR1I)- 
4157 031560 012521 MOV CR5)+,CR1)> 
4158 031562 011521 MOV CR5).CR1)- 








eee 
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4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4173 


031564 


031570 
031574 
031600 
031602 
031604 


031606 
031610 
031612 
031616 
031620 
031624 
031630 
031634 
021640 
031644 
031646 


031650 
031654 
031656 
031660 


031€62 
031662 


031666 
031670 
031672 
031674 
031676 
031700 
031702 


012721 


010421 
010321 


005037 


012605 
012604 
012603 
012602 
012601 
012600 
000207 


000005 


016560 ' 
016626' 


016560‘ 


000020 
002436' 
177777 
177777 
026506 ' 


016562’ 


016562’ 








—— aaa 


SEQ 118 


;SET TYPE FIELD 
MOV #5,(R1)+ ; ENTER DIAGNOSTIC ID IN TYPE FIELD 
;LOAD DATA FIELD (LENGTH DEPENDENT ON CONTENTS OF ‘BYTCNT’ ) 


MOV BYTCNT,RO BYTE COUNT 
MOV #PATRN1,R5 POINT TO DATA PATTERN 


4 
i 
208: MOV CR5)+,CR1)+ ; LOAD DATA PATTERN 
DEC RO ; DONE 7? 
BGE 20$ ; NO 
;CALCULATE CRC AND SAVE IN ‘XCRC’ 
MOV Ri, -CSP) ; SAVE R1 
MOV R2,-(SP) ; SAVE R2 
MOV BYTCNT ,R2 ; GET DATA BYTE COUNT 
ASL R2 ; ALIGN 
ADO #16. Re ; ADD HEADER 
MOV @TBUF ,R1 ; BASE ADDR OF TSANSMIT BUFFER 
MOV #-1,R3 ; INIT CRC 
MOV #-1,R4 ; INIT CRC 
JSR PC ,BLKCRC ; CALCULATE AND SAVE CRC 
MOV (SP)+,R2 ; RESTORE R2 
MOV CSP)+,R1 ; RESTORE Ri 


;IF CRC FLAG SET, APPEND CRC, THEN SAVE EXPECTED CRC IN ’XCRC’ TABLE 


TST DOCRC s;APPEND CRC? 

30$ 3NO, SKIP APPENDING CRC 
MOV R4,CR1)+ ;APPEND CRC LOW WORD 
MOV R3,CR1)+ ;APPEND CRC HIGH WORD 


30$: 


CLR DOCRC sINSURE CRC FLAG IS CLEARED 
MOV (SP)+,R5 ; RESTORE RS 

MOV (SP)+,R4 ; RESTORE R4 

MOV CSP)+,RS ; RESTORE R3 

MOV (SP)+,R2 ; RESTORE R2 

MOV (SP)+,R1 ; RESTORE R1 

MOV CSP)+,RO ; RESTORE RO 

RTS PC ; AND RESTORE 
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4206 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 
4216 
4217 
4218 
4219 
4220 
4221 
4222 
4223 031704 
4224 031704 
4225 031706 
4226 031710 
4227 031712 
4228 031716 
4229 021720 
4230 021722 
4231 031724 
4232 031726 
4233 031730 
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010346 
010446 
010504 
012703 
012423 
012423 
012423 
912604 
012603 
000207 


000256‘ 


EE 


FERESESAEAAEASESEEAHEEEESEEAEEEDEEAREAEEESEEEEEESEAEEEEEEEEEEEEAEEEEEE DES 


LDDEST: 


SUBROUTINE - LDDEST 


THIS SUBROUTINE LOADS A SPECIFIED DESTINATION ADDRESS 
INTO DEST: . 


INPUTS: 
OUTPUTS: 
CALLING 


R5 = ADDRESS OF SPECIFIED DESTINATION ADDRESS 
DEST = SPECIFIED DESTINATION ADDRESS 


SEQUENCE : 
JSR 


R3,-CSP) 


(SP)+,R4 
(SP)+,R3 
PC 


PC ,LODEST 


RAEALAAERAAEREAESAREAEASAEARSEREAESAERAASEALERESEASERSESEAASSESAEASSEAEEEAEEES 


SAVE R3 

SAVE R4 

R4 POINTS TO DESTINATION ADDRESS 
R3 POINTS TO DEST: 

LOAD DEST: 


RESTORE R4 
RESTORE R3 
AND RETURN 





SEQ 119 


ee ie 





a 
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4235 
4236 5242606644044 46446 £06046 046464664646466464464664464464646466464466466664464464464644446464646646666 
4237 3 
4238 : SUBROUTINE - LDDFLT 
3 
4240 : THIS SUBROUTINE WILL LOAD THE DEFAULT PHYSICAL ADDRESS 
4241 : (TABLE ‘OFAULT’) INTO BOTH TABLES ‘SRC’ AND ‘DEST’. 
; 
4243 : INPUTS - NONE 
4244 : 
4245 ; IMPLICIT INPUTS - TABLE ‘DFAULT’ CONTAINS DEFAULT PHYSICAL ADDR. 
: 
4247 : OUTPUTS - NONE 
4249 : PARAMETERS MODIFIED - TABLES ‘SRC’ AND ‘DEST’ WILL BE MODIFIED 
; 
4251 ; CALLING SEQUENCE - JSR PC,LDDFLT ;GET DEFAULT ADDRESS DATA 
3 
4253 sRRERAAAEARAAARARASERESHEAEEEEEEAARALEEAEESERASAEAEAEESASAEASESELE SE AAEASE ESE 
4254 
4255 031732 LDDFLT: 
4256 031732 010046 MOV RO,-(SP) ; SAVE RO 
4257 031734 010146 MOV R1i,-(SP) ; SAVE R1 
4258 021736 010446 MOV R4,-(SP) ; SAVE R4 
4259 021740 010546 MOV RS,-(SP) ; SAVE RS 
4261 031742 012700 000272 MOV @DFAULT,RO ; BASE ADDRESS OF DEFAULT ADDRESS 
4262 031746 012704 000264’ MOV @SRC,R4 ; BASE ADDRESS OF SOURCE ADDRESS 
4263 031752 012705 000256' MOV @DEST,RS ; BASE ADDRESS OF DEST. ADDRESS 
4264 031756 012701 000003 MOV @3,R1 ; INIT COUNTER 
4265 031762 1s: 
4266 031762 011024 MOV CRO), CR4)+ ; LOAD ADDRESS 
4267 031764 012025 MOV (RO)+,(RS)+ ; IN EACH TABLE 
4268 031766 077103 S08 R1,i8 ; UNTIL DONE 
4270 031770 012605 MOV (SP)+,R5 ; RESTORE RS 
4271 031772 012604 MOV (SP)+,R4 ; RESTORE R4 
4272 031774 012601 MOV (SP)+.R1 ; RESTORE Ri 
4278 031776 012600 MOV (SP)+.RO ; RESTORE RO 
4274 
4275 032000 000207 RTS PC 
4276 
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4278 
4279 
4280 
4281 
4282 
4283 
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FRAREAARASAEREERAESAESSSAEASEEARESESLSESEAEREABEEEAEEAEEEERALESESEEAEEREEEEES 


LOPCBB: 


SUBROUTINE - LOPCBB 
THIS SUBROUTINE MOVES A SELECTED DEFAULT 


PORT CONTROL FUNCTION INTO PCBB. 
RS = ADDRESS OF DEFAULT PORT CONTROL FUNCTION 
PCBB = SELECTED DEFAULT PORT FUNCTION 


INPUTS: 


OUTPUTS: 


CALLING SEQUENCE: 
JSR PC ,LDPCBB 


RAARAAAAKARALRAASAAREAEASEEAKRALEERAAERERASEALALAASESAREARAAAAEASASASEAEAESEE 


R3,-CSP) 
R4,-CSP) 


RS.R4 
(R4)+,CR3)+ 
CR4)+,CR3)+ 
(R4)+,CR3)+ 
CR4)+,CR3)+ 
(SP)+,R4 
(SP)+,R3 
PC 


eee, seca et et CE COLL LLL LLL LLL 


SAVE R3 
SAVE R4 


ADDRESS OF PCBB -> R3 
R4 = ADDRESS OF DEFAULT FUNCTION 


LOAD PCBB+0 
LOAD PCBB+2 
LOAD PCBB+4 
LOAD PCBB+6 
RESTORE R4 
RESTORE R3 
AND RETURN 





SEQ 121 


— = <e-mail CC CL LLL LLL LLL LLL LLL LLL 
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4307 
4308 
4309 
4310 
4311 
4312 
4313 


4324 032032 
4325 032032 
4326 032040 
4327 032046 
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012777 000300‘ 146170 
012777 000000 146164 
000207 


sRSAARESAAEREA SE RASESEESESESLEE ASE EAEEEALELEEEEEAAELAEEREEEEEAEEEEEREEEEEES 


; 

; SUBROUTINE - LDPCSK 

: 

; THIS ROUTINE MOVES THE ADDRESS OF PCBB 

; INTO PCSR2 AND PCSR3. 

3 

; INPUTS : NONE 

; 

; OUTPUTS: PCSR2 AND PCSR3 = ADDRESS OF PCBB 

; CALLING SEQUENCE: 

JSR PC,LDPCSR 

WEPTTT TTT TTTTTTTTTTTTTTTTTTTTTTTTTTTT TTT TTT TT TTT Tir Tir ttt ttt tree 

LDOPCSR : 
MOV ®PCBB, BPCSR2 ; ADDRESS OF PCBB -> PCSR2 
MOV #ZERO, @PCSR3 ; CLEAR PCSR3 


RTS PC ; AND RETURN 





SEQ 122 








 —_rzzrzsrsssssssa es amass, LLL LL LLL LLL LLL LLL 
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4329 SRAREERERAAERE EEE EAEEAEEEADEREEEEEEERAEEEEEEEAEAESAAEEEESEAEREE CEES EDEE ES 
4330 ; 
pm ‘ SUBROUTINE - LDPHYA 
; 
4333 F THIS SUBROUTINE WILL MODIFY THE DEFAULT PHYSICAL ADDRESS 
4334 : TABLE AS DETERMINED BY THE DATA IN THE TABLE WHOSE BASE 
cane ; ADDRESS IS PASSED TO THIS ROUTINE. 
; 
pet : INPUT - RS - CONTAINS BASE ADDRESS OF TABLE OF NEW ADDRESSES 
; 
cane ; OUTPUT - NONE 
: 
<san ; PARAMETERS MODIFIED - TABLE ‘WTPHYA’ MAY BE MODIFIED 
4343 : SUBROUTINE CALL - MOV #____,R5 ;GET BASE ADDR. OF NCW ADDR. TABLE 
pre ; JSR PC,LDOPHYA ;MODIFY TABLE ‘WIPHYA’ 
4346 WTTTITTTTTTT TTT TTT TT Tee eT ee 
4347 
4348 032050 LOPHYA: 
pro 032050 010046 MOV RO, -CSP) SAVE RO 
4351 032052 012700 012502' MOV @WTPHYA+2,RO ;POINT TO 2ND ENTRY IN TABLE 
4352 022056 012520 MOV CR5)+,CRO)+ ;LOAD 
4353 032060 012520 MOV CR5)+,CRO)+ ; NEW 
peo 032062 012520 MOV CR5)+,CRO)> ; ADDRESS 
4356 032064 012600 MOV (SP)+,RO sRESTORE RO 
pee 032066 000207 RTS PC 





ieee 
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4360 sRREREEREEAESEEASESEREEEEEEREEEEEAEEAEEEEAEEEAEEEEEEAEEEEEDE EE SE EERE EE EES 
4361 3 
saat ; SUBROUTINE - LDRDRB 
; 
4364 : THIS SUBROUTINE MOVES A SELECTED DEFAULT 
pre : RECEIVE DESCRIPTOR RING INTO RORB. 
3 
prod : INPUTS: RS = ADDRESS OF DATA TO BE MOVED INTO RDRB 
; 
pr : OUTPUTS: RORB = SELECTED DEFAULT RECEIVE DESCRIPTOR RING 
: 
4371 : CALLING SEQUENCE: 
4372 $ JSR PC ,LORDRB 
4373 : 
4374 SRREAEEEAERA EERE REAR EE EEEEERSEEEREAEREESEREEEREEEEEAEE EEE EE SEES EEE EE EES 
4375 
4376 032070 LDRORB: 
4377 032070 010046 MOV RO, -CSP) ; SAVE RO 
4378 032072 010346 MOV R3,-CSP) ; SAVE R3 
4379 032074 010446 MOV R4,-CSP) ; SAVE R4 
4380 032076 012700 000020 MOV #16. ,RO ; LOAD 16 WORDS 
4381 032102 012703 000660' MOV #RORB, RS ; ADDRESS OF RDRB -> R3 
4382 032106 010504 MOV RS ,R4 ; R4&4 = ADDRESS OF DEFAULT RDRB 
4383 022110 012423 10$: MOV CR4)+,CR3)+ ; LOAD WORD INTO RORB 
4384 032112 005300 DEC RO ; DONE ? 
4385 032114 001375 BNE 10$ ; NO, KEEP ON LOADING RDRB 
4386 032116 012604 MOV (SP)+,R4 ; YES, RESTORE R4 
4387 032120 012603 MOV (SP)+,R3 ; RESTORE R3 
4388 032122 012600 MOV CSP)+,RO ; RESTORE RO 
aaa 032124 000207 RTS PC ; AND RETURN 








~~. <e-mail, se CT CC LL! LL LLL LLL 
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SEQ 125 


4392 Fy SEEAEAESEAESEASASAASEESEEAALALEREELARELESEESEASEAAGASASAEESESESEEESEEEEEEESE 
4393 3 
4394 ; SUBROUTINE - LDRORX 
; 
4396 ; THIS SUBROUTINE MOVES A SELECTED DEFAULT RECEIVE 
4397 : DESCRIPTOR RING INTO RDRBX. 
; 
4399 ' INPUTS: RS = ADDRESS OF DATA TO BE MOVED INTO RDRBX 
: 
4401 ; OUTPUTS: DRRBX = SELECTED DEFAULT RECEIVE DESCR. RING 
4403 : CALLING SEQUENCE: 
4404 ; JSR PC ,LDRDRX 
4405 3 
4406 pREEREEAEEASEERAREARERELEREEEEEREEAREEEEEAEEERASEEAEEEEESESEREAEESE SE EASES 
4407 
4408 032126 LORDRX: 
4409 032126 010046 MOV RO, -(SP) ; SAVE RO 
4410 032130 010346 MOV R3,-(SP) ; SAVE R3 
4411 032132 010446 MOV R4,-(SP) ; SAVE R4 
4412 032134 012700 000304 MOV #196. ,RO ; LOAD 196 WORDS (49 ENTRIES) 
4413 032140 012703 001624' MOV #RDRX,R3 ; BASE ADDRESS OF RDRBX --> R3 
4414 032144 0105 MOV R5,R4 ; BASE ADDRESS OF DATA --> R4 
4415 032146 108: 
4416 032146 012423 MOV (R4)+,(R3)+ ; LOAD WORD INTO RDRBX 
4417 032150 005300 DEC RO ; DONE? 
4418 032152 001375 BNE 10$ ; NO, KEEP ON LOADING 
4419 032154 012604 MOV (SP)+,R4 ; YES, RESTORE R4 
4420 032156 012603 MOV (SP)+,R3 ; RESTORE R3 
4421 032160 012600 MOV (SP)+.RO ; RESTORE RO 
4422 032162 000207 RTS PC ; AND RETURN 
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4425 3 $6666 6660666 66 6666646466 64666466 6464464646646 6464646464466 4666 62 6646460664646 6646646646446464 eke 
4426 3 
4427 ; SUBROUTINE - LOTORB 
i 
4429 THIS SUBROUTINE MOVES A SELECTED DEFAULT 
4430 TRANSMIT DESCRIPTOR RING INTO TORB. 
; 
4432 ; INPUTS: RS = ADDRESS OF DATA TO BE MOVED INTO TORS 
; 
4434 ; OUTPUTS: TDRB = SELECTED DEFAULT TRANSMIT DESCRIPTOR RING 
4436 ' CALLING SEQUENCE: 
4437 , JSR PC,,LOTORB 
4438 : 
4439 F} £bb6646 6466446666 446464 646 6664606460666 46666666666 4664666664646 46646 46464644646464646466446468048 
4440 
4441 032164 LDTORB : 
4442 032164 010046 MOV RO, -(SP ; SAVE RO 
4443 032166 010346 MOV R3,-(SP) ; SAVE R3 
4444 032170 010446 MOV R4,-(SP) ; SAVE R4 
4445 032172 012700 000020 MOV #16. ,RO ; LOAD 16 WORD 
4446 032176 012703 000620' MOV @TORB,R3 ; ADDRESS OF TORB -> 
4447 032202 010504 MOV UR4 ; R4 = ADDRESS OF DEFAULT TORB 
4448 032204 012423 10$: MOV (R4)+,(R3)+ ; LOAD WORD INTO TORB 
4449 032206 005300 DEC RO ; DONE ? 
4450 032210 001375 BNE 108 ; NO, KEEP ON LOADING TORB 
4451 032212 012604 MOV (SP)+,R4 ; YES, RESTORE R4 
4452 032214 012603 MOV (SP)+,R3 ; RESTORE R3 
4453 032216 012600 MOV (SP)+,RO ; RESTORE RO 
4454 032220 000207 RTS PC ; AND RETURN 
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4456 
4457 sRRREEEEEEREEEEE SESE REREEEEEEEAEREEEEAEAEEEE ESSE EERE ESSE EERE EE EE EE EE EE SES 
4458 ; 
pene : SUBROUTINE - LDTDRX 
; 
4461 3 THIS SUBROUTINE MOVES A SELECTED DEFAULT 
an ; TRANSMIT DESCRIPTOR RING INTO TORX. 
4 : 
pen ; INPUTS: RS = ADDRESS OF DATA TO BE MOVED INTO TORX 
: 
cant ; OUTPUTS: TORX = SELECTED DEFAULT TRANSMIT DESCRIPTOR RING 
; 
4468 : CALLING SEQUENCE: 
4469 $ JSR PC ,LDTORX 
4470 ; 
4471 5 RREERREAEEAEEEAREERRESEREEEAEEEEEAEEEEEEEAEEEAAEEEAEEAEEE EERE REESE EERE EES 
4472 
4473 032222 LDOTDORX: 
4474 032222 010046 MOV RO,-CSP) ; SAVE RO 
4475 032224 010346 MOV R3,-CSP) ; SAVE R3 
4476 032226 010446 MOV R4,-CSP) ; SAVE R4 
4477 032230 012700 000304 MOV #196.,R0 ; LOAD 196 WORDS (49 ENTRIES) 
4478 032234 012703 001014’ MOV #TDORX,RS ; ADDRESS OF TDORX -> R3 
4479 022240 010504 MOV R5,R4 ; R4 = ADDRESS OF DEFAULT TDORB 
4480 032242 012423 10$: MOV (R4)+,CR3)+ ; LOAD WORD INTO TORS 
4481 032244 005300 DEC RO ; DONE ? 
4482 032246 001375 BNE 10$ ; NO, KEEP ON LOADING TORE 
4483 032250 012604 MOV (SP)+,R4 ; YES, RESTORE R4 
4484 032252 012603 MOV (SP)+,R3 ; RESTORE R3 
4485 032254 012600 MOV CSP)+,RO ; RESTORE RO 
4486 032256 000207 RTS PC ; AND RETURN 





err 


GLOBAL AREAS MACRO YOS.02 Friday 12-Jul-85 09:33 Page 65 SEQ 128 
GLOBAL MACRO AND SUBROUTINES SECTION 
4488 
4489 s SRKEEEEESASESESSEASESEEEASSASESE SASS ERE AEALEEESEAASEEEEEEASEEEAEEESEEEES 
4490 ; 
— ; SUBROUTINE - LOUDBB 
; 
4493 ; THIS ROUTINE MOVES A SELECTED DEFAULT 
aane ; DATA STRUCTURE INTO UDBB. 
$ 
4496 : INPUTS: RS = ADDRESS OF DATA TO BE MOVED INTO UDBB 
per ; RO = NUMBER OF WORDS TO BE MOVED 
$ 
po ; OUTPUTS: UDBB = SELECTED DEFAULT DATA STRUCTURE 
: 
4501 ; CALLING SEQUENCE: 
4502 ; JSR PC ,_LDUDBB 
4503 : 
4504 sRARKEEAASEAEAAEEAERAREREAESERASEALESESESESLESESESESEASEAEEESEE SEES EEEEEESE 
4505 
4506 032260 LDUDBB : 
4507 032260 010146 MOV Ri,-CSP) ; SAVE Ri 
4508 032262 010346 MOV R3,-CSP) ; SAVE R3 
4509 032264 010446 MOV R4,-CSP) ; SAVE R4 
4510 032266 010001 MOV RO,R1 ; Ri= NUMBER OF WORDS TO BE MOVED 
4511 032270 012703 000310’ MOV #UDBB , R3 ; ADDRESS OF UDBB -> R3 
4512 032274 010504 MOV RS ,.R4 ; R4= ADDRESS OF DATA TO BE MOVED 
4513 032276 012423 10$: MOV CR4)+,CR3)+ ; LOAD WORD INTO UDBB 
4514 032300 005301 DEC Ri ; DONE ? 
4515 032302 001375 BNE 10$ ; NO, KEEP ON LOADING 
4516 032304 012604 MOV (SP)+,R4 ; YES, RESTORE R4 
4517 032306 012603 MOV CSP)+,R3 ; RESTORE R3 
4518 032310 012601 MOV (SP)+¢,R1 ; RESTORE Ri 
4519 032312 000207 RTS PC ; AND RETURN 
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4521 
4522 F} $6666 646666466 666666646 6666 64666666666 66646 666666 64666666646666666666664664666 
4523 3 
4524 ; NOTE: MAY BE ABLE TO DELETE THIS FROM FINAL PRODUCT 
a 
4526 : SUBROUTINE - LOXCRC 
; 
4528 ; THIS SUBROUTINE LOADS XCRC WITH EXPECTED CRC DATA. 
‘ 
4530 INPUTS: RS = ADDRESS OF EXPECTED DATA 
> 
4332 OUTPUTS: XCRC TABLE = EXPECTED CRC DATA 
4534 ; CALLING SEQUENCE: 
4535 ; JSR PC ,LDXCRC 
4537 koe EEEEREEEEE4KEDOEESOEESO6E64660666 6464666 46646646646664664666466646666686 
4538 
4539 032314 LDXCRC: 
4540 032314 010346 MOV R3,-(SP) ; SAVE R3 
4541 032316 010446 MOV R4,-(SP) ; SAVE R4 
4542 032320 012704 016574’ MOV @XCRC,R4 ; R4 POINTS TO XCRC 
4543 032324 010503 MOV RS.R3 ; RZ POINTS TO DATA 
4544 032326 012324 MOV (R3)+,(R4)+ ; LOAD XCRC TABLE 
4545 032330 012324 MOV (R3)+,(R4)« 
4546 032332 012604 MOV (SP)+_R4 ; RESTORE R4 
4547 032334 012603 MOV (SP)+_R3 ; RESTORE R3 
4548 032336 000207 RTS PC ; AND RETURN 
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4551 5 66h 666460066608 006000066006 0606 0806 666606 06060606 46666060666060608860608 
4552 
sane ; SUBROUTINE - LOXROR 
; 
pr ; THIS SUBROUTINE LOADS XRDRBO WITH EXPECTED RORB DATA. 
; 
= ; INPUTS : RS = ADDRESS OF EXPECTED DATA 
; 
pr ; OUTPUTS: XRDRBO TABLE = EXPECTED RORB DATA 
i 
4561 : CALLING SEQUENCE : 
aaee ; JSR PC ,LDXROR 
4564 WTP TTT TTT OT TTTTTTTTTTTTITTTITTT TTI Titi TT tt ttt ttt ttt ttt 
4565 
4566 032340 LOXROR : 
4567 032340 010346 MOV R3,-CSP) ; SAVE R3 
4568 032342 010446 M0V R4,-C(SP) ; SAVE R4 
4569 032344 012704 016550’ MOV @XRDRBO,R4 ; R4 POINTS TO XRORBO 
4570 032350 010503 ; MOV RS.R ; R3 POINTS TO DATA 
4571 032352 0123524 MOV CR3)+,CR4)+ ; LOAD XRORBO TABLE 
4572 032354 012324 MOV CR3)+,CR4)+ 
4573 032356 012324 MOV CR3)+,CR4)+ 
4574 032360 012524 MOV CR3)+,CR4)¢ 
4575 032362 012604 MOV C(SP)+,R4 ; RESTORE R4 
4576 032364 012603 MOV (SP)+,R3 ; RESTORE R3 
4577 032366 000207 RTS PC ; AND RETURN 
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032370 
032370 
032372 
032374 
032400 
032404 
032406 
072406 
022410 
032412 


032414 
032416 
032420 
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010346 
010446 
012700 
012704 
010503 


012324 
005300 
001375 


012604 
012603 
000207 


000004 
016550’ 


SSEAAEALESAEEEEEEEEEERESESESASESAEESEERELESSEEEEEEESEEESESESEEESEEDEEES EES 


10$: 


SUBROUTINE - LDXTOR 
THIS SUBROUTINE LOADS XTORBO WITH EXPECTED TORB DATA. 
RS = ADDRESS OF EXPECTED DATA 

XTORBO TABLE = EXPECTED TORB DATA 


INPUTS: 
OUTPUTS: 
CALLING 


SEQUENCE : 
JSR 


R3,-(SP) 
R4,-CSP) 


#4 ,RO 
#XTORBO,R4 
RS,R3 


CR3)+,CR4)+ 
RO 

10$ 
(SP)+,R4 


(SP)+,R3 
PC 


EE TT 


PC ,LDOXTOR 


kaa EREEKEAESAKERASAERAAEAAEEAEEEAREEARABESESEAREREAAEAEEEESAEEKAEEEEHE SE EEE 


; AND RETURN 


SAVE R3 

SAVE R4 

LOOP COUNT 

R4 POINTS TO XTDRBO 
R3 POINTS TO DATA 


LOAD XTDRBO TABLE 
REDUCE LOOP COUNT 
LOOP AGAIN IF NOT COMPLETED 


RESTORE R4 
RESTORE R3 





SEQ 131 
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4610 
4611 SREAAERERASAEEEASERERERESEEEEEEAEEEAEEEDEEEEEAEAEEAEEDERE SEERA ESSE EEE ESS 
4612 
per : SUBROUTINE - NORXI 
3 
peer 3 THIS SUBROUTINE VERIFIES THE RXI BIT IS NOT SET. 
4617 ; INPUTS: NONE 
4618 8 
4619 : OUTPUTS: IF RXI NOT SET ( RXI = O ) 
4620 : THEN CARRY = 0 
4621 ; 
46022 ; IF RXI IS SET ( RXI = 1 ) 
4623 : THEN CARRY = 1 
4624 : PCSRO -> EPCSRO 
4625 : PCSRi -> EPCSR1 
4626 3 
4627 : CALLING SEQUENCE: 
4628 3 JSR PC ,NORXI 
4629 ; 
4630 SRARRKAASSRREEARERESERALEEEASAAEAEEEEEAEEASEREEDEEEEEEEEEE ESSE EEE SEED EES 
4631 
4632 032422 NORXI: 
4633 022422 010446 MOV R4,-(SP> ; SAVE R4 
4634 022424 017704 145574 MOV @PCSRO,R4 ; PCSRO -> R4 
4635 032430 032704 020000 BIT @RXI,R4 ; RXI = 0 ? 
4636 032434 001407 BEQ 10$ ; YES 
4637 032436 010437 016514’ MOV R4,.EPCSRO ; NO, PCSRO -> EPCSRO 
4638 032442 017737 145560 016516' MOV @PCSR1,EPCSR1 ; PCSR1i -> EPCSR1 
4639 032450 000261 SEC ; SET CARRY 
4640 032452 000401 BR 20$ 
4641 032454 000241 10$: CLC ; CLEAR CARRY 
4642 032456 012604 20$: MOV (SP)+,R4 ; RESTORE R4 
4643 032460 000207 RTS PC ; AND RETURN 
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032462 
032462 
032464 
022466 
032470 


032472 


032514 
032520 


032522 
032526 
032530 


032532 
032534 
032536 
032540 


032542 





010046 
010146 
010246 
010546 


012701 
013702 
012700 
012003 
011004 


112105 
004737 
077204 


012700 
010320 
010410 


012605 
012692 
012601 
012600 


000207 


006440‘ 
016560’ 
016574’ 


031160' 


016574‘ 


mal 
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SEQ 133 


sSARESESEEEEEESESESEEAEEEEAAERASERESEASESEAESEEEEEEESEEEEEASES SASHES EEEEEEEE 


ROMCRC: 


i$: 


SUBROUTINE - ROMCRC (Used specifically in Read Int.ROM Test) 


This subroutine calculates ae 16 bit CRC on a block of data. 
Used explicitly for ROM CRC calulation. | 


IMPLICIT 
INPUTS: 


OUTPUTS: 


CALLING 


RBUF = BASE ADDRESS OF DATA BLOCK 
BYTCNT = DATA BLOCK BYTE COUNT 


R4,R3 = CRC 
XCRC = BASE ADDRESS OF CRC STORAGE TABLE, 
CONTAINING UPDATED DATA FROM R4,R3 


SEQUENCE : 


JSR PC ,ROMCRC ;GO0 CALCULATE CRC 


RKAEKRRAERARAEALAAAARSEAAAEAEERAEASLAEAEREARERAEABRAEALACAESESALEASEAAALASALE LEASES 


RO,-CSP) ; SAVE RO 

R1,-(SP) ; SAVE R1 

R2,-CSP> ; SAVE R2 

RS,-CSP) ; SAVE RS 

#RBUF RL ; GET BASE ADDRESS OF DATA BLOCK 
BYTCNT ,R2 ; GET DATA BLOCK BYTE COUNT 
#XxCRC,RO ; GET BASE ADDRESS OF INITIAL CRC 
CRO)+,R3 ; LOAD INITIAL 

(RO) ,R4 : CRC 

CR1)+,R5 ; GET NEXT CHARACTER 

PC ,GETCRC ; CALCULATE CRC 

R2,1$ ; DO NEXT CHARACTER IF NOT FINISHED 
#XCRC,RO ; POINT TO BASE STORAGE ADDRESS 
R3,CRO)+ ; UPDATE 1ST WORD 

R4,CRO) ; UPDATE 2ND WORD 

(SP)+,R5 ; RESTORE R5 

CSP)+,R2 ; RESTORE R2 

(SP)+,R1 ; RESTORE R1 

(SP)+,RO ; RESTORE RO 

PC 
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032544 
032544 
032546 
032550 
032552 
032554 


032556 


032572 


032574 
032600 
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010046 
010146 
010346 
010446 
010546 


012703 


012705 
012703 


006440' 
000036 


RSS ERESESEEAASAERSASEALES SEAS SESEASEEEEAEEASEERECEAESEEEESSEEEEEEEEEEEEEEE 


SUBROUTINE - SETBF CUsed specifically in Int. Loopback Length Err Tst) 


SETBF : 


THIS ROUTINE SETS UP THE TRANSMIT AND RECEIVE BUFFERS 

FOR A DATA BYTE LENGTH DETERMINED BY VALUE PASSED IN 

R2. CRC WILL ALSO BE CALCULATED, SAVED, AND IF REQUIRED, 
APPENDED TO END OF DATA IF PARAMETER ‘DOCRC’ SO INDICATES. 


A. CLEAR RECEIVE BUFFER RBUF 
B. LOAD TRANSMIT BUFFER TBUF (DEST. ADDRESS,SOURCE ADDRESS ,DATA) 
C. CALCULATE CRC IF CRC FLAG SET 


INPUTS: DOCRC = 0 THEN NO CRC CALCULATION 
1 THEN CALCULATE CRC, SAVE, AND APPEND 
-1 THEN CALCULATE CRC, SAVE, DO NOT APPEND 


R2 = number of data bytes 


IMPLICIT INPUTS: 
DEST: = DESTINATION ADDRESS 


RBUF IS CLEARED 

TBUF IS SET UP FOR TRANSMIT 
R3,R4 AND ALSO ‘XCRC’ CONTAIN 
CRC IF ‘DOCRC’ WAS SET. 


PARAMETERS MODIFIED: ‘DOCRC’ WILL ALWAYS BE CLEARED ON EXIT 
R3,R4 MODIFIED IF ‘DOCRC’ SET. 


OUTPUTS: 


CALLING SEQUENCE: 
INSURE ‘DOCRC’ FLAG CONTAINS CORRECT DATA 


JSR PC ,SETBF 


KRAAKAASAEARERSKEKASERAELASESSAAREKASSERAEEESKALSERESASLELES AE SELES LL ALES ALLEL 


RO,-CSP) ;SAVE RO 
MOV R1,-(CSP) sSAVE R1 
MOV R3,-CSP) SAVE RS 
MOV R4,-(SP) sSAVE R4 
MOV RS,-CSP) ;SAVE RS 


;CLEAR ‘RBUF‘ 30. WORDS 


;POINT TO RBUF 
;COUNT = 60 BYTES 


MOV PRBUF RS 
MOV #30. ,RO 


CLR CR3)+ ;CLEAR BUFFER 
DEC RO ; DONE? 
BNE 10$ ;NO 


;SET UP TRANSMIT BUFFER ‘TBUF’ 
s;LOAD DESTINATION ADDRESS 


;POINT TO DESTINATION ADDRESS 
;POINT TO TBUF 


MOV #SRC RS 
MOV #TBUF ,R3 





SEQ 134 








er 








ee 
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SEQ 135 


4751 032604 012523 MOV CR5)+,CR3)+ ;LOAD DESTINATION ADDRESS 
4752 032606 012525 MOV CR5)+,CR3)+ i 

pn 032610 012523 MOV CR5)+,CR3)+ ; 

pote, ;LOAD SOURCE ADDRESS 

4757 032612 012705 000264' MOV #SRC,RS ;LOAD FOR LATER COMPARISON 
4758 032616 012523 MOV CR5)+,CR3)+ : 

4759 032620 012523 MOV CR5)+,CR3)+ i 

pny 032622 012523 MOV CRS5)+,CR3)+ ; 

pte ;SET TYPE FIELD 

pt 032624 012723 002540 MOV #2540, (R3)+ ;TYPE FIELD = DIAGNOSTICS 
pe ;LOAD DATA FIELD 

4768 032630 010200 MOV R2,RO ;NUMBER OF WORDS 

4769 032632 012705 016626' MOV @PATRN1,RS ;POINT TO DATA PATTERN 
4770 032636 012523 20$: MOV CR5)+,CR3)+ ;LOAD DATA PATTERN 

4771 032€40 0053500 DEC RO ; DONE? 

poke 032642 001375 BNE 20$ 3NO 

pita ;CALCULATE CRC AND SAVE IN ‘XCRC’ 

4776 032644 010146 MOV R1,-(SP) sSAVE Ri 

4777 032646 010246 MOV R2,-(SP) sSAVE R2 

4778 032650 010346 MOV R3,-CSP) ;SAVE R3 

4779 032652 006302 ASL R2 ;MULTIPLY BY 2 FOR BYTES 
4780 032654 062702 000020 ADD #16. Re ;ADD HEADER 

4781 032660 012701 002436’ MOV #TBUF ,R1 ;BASE ADDR OF TRANSMIT BUFFER 
4782 032664 012703 177777 MOV #-1,R3 ;INIT CRC 

4783 032670 012704 177777 MOV #-1,R4 ;INIT CRC 

4784 032674 004737 026506' JSR PC ,BLKCRC sCALCULATE AND SAVE CRC 
4785 032700 012603 MOV (SP)+,R3 sRESTORE R3 

4786 032702 012602 MOV (SP)+,R2 sRESTORE R2 

poe 032704 012601 MOV (SP)+,R1 RESTORE R1 

ph ;IF CRC FLAG SET, APPEND CRC 

4791 032706 005737 016562’ TST DOCRC ;GENERATE CRC? 

4792 032712 001402 BEQ 30$ ;NO, SKIP CRC GENERATION 
4793 032714 010423 MOV R4,CR3)+ ;APPEND CRC LOW WORD 
4794 032716 010313 MOV R3,CR3) ;APPEND CRC HIGH WORD 
4795 032720 30$: 

4796 032720 012605 MOV CSP)+,R5 ;RESTORE RS 

4797 032722 012604 MOV CSP)+,R4 ;RESTORE R4 

4798 032724 012603 MOV (SP)+,R3 ;RESTORE R3 

4799 032726 012601 MOV (SP)+,R1 ;RESTORE R1 

4800 032730 012600 MOV (SP)+,RO s;RESTORE RO 

pin: 032732 000207 RTS PC sRETURN TO CALLING ROUTINE 





on = mmm a 
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032760 
032762 
032766 
032766 
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016620' 


032770' 
000002 


000006 


123 
045 
124 
124 
000 





SEQ 136 


sRaRREEEREAEARAEAAEEEREEASESEARASEAEEAEASAEEREEEEEEEEESEEAEEESEEEEEEEEEEESE ES 


SUBROUTINE PNTID 


PRINTS THE NAME OF EACH TEST THAT IS RUN, IF PRINT FLAG 
SET, AND IS 1ST LOOP THROUGH TEST. 


INPUTS: R4 = POINTER TO TEST NAME MESSAGE 
OUTPUT: IF PRINT FLAG SET, TEST NAME WILL BE PRINTED 


CALL: MOV 


#MSGNO ,R4 
JSR PC ,PNTID 


;GET ADDRESS OF MESSAGE 
;PRINT TEST NAME 


5 RRARARAERAAEARARARAEEEEEREAAEAAEEEEEEREREEAAAEREEAEEEEAEEREEEEEE SESE EELEEEES 


PNTID: 


10$: 


TSTFMT: .ASCIZ ‘sS#TSA TEST 


.EVEN 


TST PRNTIT 
BEQ 10$ 


MOV R4,RO 
PRINTF #TSTFMT,RO 


RTS PC 


oo THE TEST NAME? 


5 
;SETUP FOR PRINT 
;PRINT TEST NAME. 


;RETURN TO CALLING PROGRAM 


RO ,-CSP) 
+ 








- eel = a 
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SEQ 137 


4834 FY bebOO 4444S 4EEEEEEEEEEEEEEOEEEEEKEEEEESE EEE EEEEEEEEEEEEEEEEEEREEEDREEAEEEEDE 

4835 ; 

4836 ; SUBROUTINE - SETBUF 

4838 THIS ROUTINE SETS UP THE TRANSMIT AND RECEIVE BUFFERS. THE 

4839 NUMBER OF BYTES IN A PACKET IS DETERMINED BY THE CONTENTS 

4840 : PASSED IN 'BYTCNT’. IN ANY CASE, A PACKET LENGHT WILL BE NO 

4841 ' MORE THAN 32 BYTES, OR 36 INCLUDING CRC IF ‘DOCRC’ SET. 

4843 ; 

4844 ; A. LOAD TRANSMIT BUFFER TBUF (DEST. ADDR,SOURCE ADDR, TYPE ,DATA) 

4545 ' B. APPEND CRC IF ‘DOCRC’ FLAG SET 

4 ; 

4847 ; INPUTS : DOCRC = © THEN NO CRC 

4848 : i THEN CALCULATE CRC AND APPEND 

4549 BYTCNT= # OF DATA BYTES IN PACKET 

4851 , IMPLICIT INPUTS: 

4852 SRC: = SOURCE ADDRESS 

4853 ; DEST: = DESTINATION ADDRESS 

4855 ; OUTPUTS: 

4856 ' TBUF IS SET UP FOR TRANSMIT 

4858 ' PARAMETERS MODIFIED: ‘DOCRC’ WILL ALWAYS BE CLEARED ON EXIT 
‘ : 

4860 : CALLING SEQUENCE: 

4961 ; INSURE ‘DOCRC’ FLAG CONTAINS CORRECT DATA 

4863 ; MOV #Z,BYTCNT ;NUMBER OF BYTES THIS PACKET 

4364 ; JSR PC: SETBUF 

4866 ; REEKRRAAASLEKRAESEKESESEKEASEAREEEKEKES ES EEK4EEEEESEASEEDEL4EEEEEEEEEEEEKESELESDE 

4867 

4868 033006 SETBUF : 

4869 033006 010046 MOV RO, -C(SP) ; SAVE RO 

4870 033010 010146 MOV R1.-(SP) ; SAVE Ri 

4871 033012 010246 MOV R2,-(SP) ; SAVE R2 

4872 033014 010346 MOV R3,-(SP) ; SAVE R3 

4873 033016 010446 MOV R4,-(SP) ; SAVE R4 

4574 033020 010546 MOV RS, -(SP) ; SAVE RS 

4876 SET UP TRANSMIT BUFFER TBUF 

4877 ;LOAD DESTINATION ADDRESS 

4879 033022 012705 000256: MOV #DEST.RS ; POINT TO DESTINATION ADDRESS 

4880 03 012701 002436' MOV STBUF RI ; POINT TO TBUF 

4881 033032 012521 MOV (R5)+,(R1)+ ; LOAD DESTINATION ADDRESS 

4882 033034 012521 MOV (R5)+,(R1)+ 

4983 033036 012521 MOV (R5)+,(R1)+ 

4885 ;LOAD SOURCE ADDRESS 

4887 033040 012705 000264: MOV #SRC,RS ; LOAD FOR LATER COMPARISON 

4888 033044 012521 MOV (RS)+,(R1)+ 

4889 033046 012521 MOV (R5)+,(R1)+ 

4890 033050 012521 MOV (R5)+,(R1)+ 
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033152 
033156 
033160 
033162 


033164 
033164 


033170 


a) 
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012721 


010421 


002540 


016560‘ 
016626‘ 


016560‘ 
016562’ 
000016 
000020 
002436' 
177777 


177777 
026506 ' 


016562’ 


016562' 


;SET TYPE FIELD 


 — 


; ENTER DIAGNOSTIC ID IN TYPE FIELD 


BYTE COUNT 

POINT TO DATA PATTERN 
LOAD DATA PATTERN 
DONE ? 


SAVE Ri 

SAVE R2 

GET DATA BYTE COUNT 
ALIGN 

ADD CRC TO PACKET? 
YES 


NO, 

SKIP NO ADD CRC DATA 

WILL ADD CRC TO PACKET 

BASE ADDR OF TRANSMIT BUFFER 
INIT CRC 


INIT CRC 
CALCULATE AND SAVE CRC 
RESTORE R2 
RESTORE R1 


EXPECTED CRC IN ‘XCRC’ TABLE 


sAPPEND CRC? 

;NO, SKIP APPENDING CRC 
sAPPEND CRC LOW WORD 
;APPEND CRC HIGH WORD 


;INSURE CRC FLAG IS CLEARED 


RESTORE RS 
RESTORE R4 
RESTORE R3 
RESTORE R2 
RESTORE Ri 
RESTORE RO 
AND RESTORE 


MOV #2540, (R1)+ 
;LOAD DATA FIELD CLENGTH DEPENDENT ON CONTENTS OF ‘BYTCNT’ ) 

MOV BYTCNT ,RO 

MOV #PATRN1,RS 
20$: MOV C(R5)+,CR1)+ 

DEC RO 

BGE 20$ 
;CALCULATE CRC AND SAVE IN ‘XCRC’ 

MOV R1,-CSP) 

MOV R2,-CSP) 

MOV BYTCNT ,R2 

ASL R2 

TST DOCRC 

BNE 22$ 

ADD #14. ,R2 

BR $ 
228: ADD #16. ,R2 
25$: MOV #TBUF ,R1 

MOV #-1,R3 

MOV #-1,R4 

JSR PC ,BLKCRC 

MOV (SP)+,R2 

MOV CSP)+,R1 
;IF CRC FLAG SET, APPEND CRC, THEN SAVE 

TST DOCRC 

BEQ 30$ 

MOV R3,CR1)+ 
30$: 

CLR DOCRC 

MOV (SP)+,RS 

MOV (SP)+,R4 

MOV C(SP)+,R3 

MOV CSP)+,R1 

MOV (SP)+,RO 

RTS PC 





SEQ 138 





al 
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4941 fs RARRREEARESEESEESASESRSEAEAEAAEEASEELERALEASAAAESSESSAESEEE ££4444464464644466466 
4942 ; 
4943 ; SUBROUTINE - SRCDST 
4945 ; THIS SUBROUTINE WILL INDEPENDENTLY, LOAD BOTH TABLES 
4946 ‘SRC’ AND ‘DEST’ WITH PHYSICAL ADDRESSES OBTAINED FROM 
4947 ; TABLE ADDRESSES PASSED TO THIS ROUTINE. 
; 
4949 INPUT - R1 - CONTAINS ADDRESS OF TABLE TO LOAD INTO ‘SRC’ 
4950 ; R2 - CONTAINS ADDRESS OF TABLE TO LOAD INTO ‘DEST’ 
4952 OUTPUT - NONE 
4954 PARAMETERS MODIFIED - TABLES ‘SRC’ AND ‘DEST’ MAY BE CHANGED 
4956 CALLING SEQUENCE - MOV #____,R1 ; ADDR. OF TABLE TO LOAD ‘SRC’ 
4957 ; MOV ‘R2 ; ADDR. OF TABLE TO LOAD ‘DEST’ 
4958 JSR PC,SRCDST ; LOAD ADDRESS TABLES 
4960 ARRAAKKRAAAAARAREKERAKEAKAREABREAEEEEESEEEEEE4EEE4O$4O044466464644646664644646646644686 
4961 
4962 033206 SRCDST: 
4963 033206 010046 MOV RO,-(SP) SAVE RO 
4964 033210 010146 MOV R1,-(SP) SSAVE RI 
4965 033212 010246 MOV R2,-(SP) ;SAVE R2 
4966 033214 010446 MOV R4,-(SP) ;SAVE R4 
4967 033216 010546 MOV RS. -(SP) SAVE RS 
4969 033220 012704 000264: MOV #SRC,R4 ;GET BASE ADDR. OF TABLE ‘SRC’ 
4970 033224 012705 000256’ MOV #DEST.RS GET BASE ADDR. OF TABLE ‘DEST’ 
497 033230 012700 000003 MOV sRO ;INIT COUNTER 
4973 033234 012124 1s: MOV (R1)+,(R4)+ ;LOAD BOTH 
4974 033236 012225 MOV (R2)+, (R5)+ ; ADDRESS TABLES 
4975 033240 077003 SOB : SUNTIL DONE 
4977 033242 012605 MOV (SP)+,RS ;RESTORE RS 
4978 033244 012604 MOV (SP)+_ RO ;RESTORE R4 
4979 033246 012602 MOV (SP)+,R2 ;RESTORE R2 
4980 033250 012601 MOV (SP)+, Ri ;RESTORE Ri 
4981 033252 012600 MOV (SP)+_RO ;RESTORE RO 
4983 033254 000207 RTS PC 





_—- a 
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4985 
4986 [edb ReehREERERAEEEAAEEEEEEEEADAEEAAEAEAEAEAEEARAEEE EERE EE EA ERED SEER EERE ES EE EE EELS 
4987 ; 
ptm ; Subroutine - SRWRAM 
: 
4990 $ THIS SUBROUTINE SETS UP FOR EITHER A LOAD OR A DUMP 
4991 ; OF A 1K SEGMENT OF INTERNAL RAM. LOAD OR DUMP FUNCTION 
Pim : IS DETERMINED BY VALUE PASSED IN R5. 
; 
4994 ; INPUTS: RS - IF RS = 20 THEN DUMP MEMORY 
4995 $ IF RS = 21 THEN LOAD MEMORY 
4996 ; Ri - CONTAINS NUMBER OF 1K RAM BLOCKS TO ACCESS 
pends : R3 - CONTAINS BASE ADDR OF 1K RAM TO R/W 
conn $ OUTPUTS: NONE 
5001 ; CALLING SEQUENCE: MOV FUNCTION#,RS sGET VALUE OF FUNCTION 
— : JS PC ,SRWRAM s;EXECUTE 
5004 RREREAEAEAEAAREREREEAEEAEAEARAEEEEAEEEEEERERAES EE EERE EEE EEE EEE EE ERED EES 
5005 
5006 033256 SRWRAM: 
5007 033256 010246 MOV R2,-CSP) ;SAVE R2 
5008 023260 010502 MOV »R2 ;SAVE RS 
5009 033262 004737 032002' JSR PC ,LOPCBB ;LOAD FUNCTION -> PCBB CUSES RS) 
5010 033266 012705 015674' MOV #UDB11A,R5 sDEFAULT UDBB 
5011 033272 012700 000005 MOV #5,RO ;FOUR WORDS 
5012 033276 004737 032260' JSR PC ,LDUDBB ;LOAD INTO UDBB 
5013 033302 022712 000021 CMP #21, (R2) 31S THIS A LOAD MEMORY? 
5014 033306 001404 BEQ i$ YES 
5015 033310 012737 006440‘ 000312' MOV @RBUF , UDBB +2 ;sTHIS IS A READ MEMORY 
5016 033316 000403 BR es ;SKIP SETTING FOR TBUF 
5017 033320 012737 002436' 000312’ 1$: MOV @TBUF , UDBB +2 ;THIS IS A LOAD MEMORY 
5018 033326 011337 000316’ 2s: MOV (R3),UDBB+6 ;LOAD LINK ADDR -> UDBB+6 
5019 033332 005737 016606‘ TST EAFLAG s;sNEED TO SET EXT ADDR BITS? 
5020 033336 001006 BNE 3$ ;YES 
5021 033340 022713 176000 CMP #176000, (R3) ;TIME TO SET ‘EAFLAG’? 
5022 033344 001006 BNE 4$ 3;NO 
5023 033346 005237 016606' INC EAFLAG ;YES 
5024 033352 000403 BR 4$ ;BUT, ONLY NEXT TIME 
5025 033354 012737 000001 000320’ 3$: MOV #1, UDBB+10 ;EXT ADDRESS BIT 
5026 033362 022701 000001 4$: CMP #1,R1 3IS THIS LAST 1K? 
7 033 001003 BNE 5$ ;NO 
5028 033370 012737 001200 000310‘ MOV #1200, UDBB sYES, ONLY READ 1200(8) WORDS 
5029 033376 S$: 
5030 033376 012602 MOV (SP)+,R2 ;RESTORE R3 
aoce 033400 000207 RTS PC ;RETURN TO CALLING PROGRAM 





-_ - 
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005077 144640 
012700 000340 


104441 
000207 


por 000240 
ee 000100 144614 


SAREE AEREAEEEESAEAEEAERAEEEEEEEEAEEAEEE EERE EEEEES SEES DEERE SEAEEEEERES ERS 
; THIS ROUTINE TURNS THE CLOCK OFF 

INPUT: NONE 

OUTPUT: NONE, ON EXIT SUBROUTINE, CLOCK IS OFF 

CALL: JSR PC, TIMOFF 


; 
; 
: 
: 
+ 
+ 
3 
sEREEAAAEEERAKAREAER EE EEAEREEEARAEEEEEAEAEEEESE ESE EEESESEDESESE ESE ERESEEEEEES 


TIMOFF : 
CLR acLKCSR ;CLEAR THE INTERRUPT ENABLE 
SETPRI #PRIO7 SUP THE PRIORITY 
MOV @PRIO7 RO 
TRAP CSSPRI 
RTS PC ;RETURN TO CALLING ROUTINE 
sRRARKAAASERACEREREAREEEEAEEEEASESEAALESES LEA EEEAEKEEEEEEEEEEEESESESEEESES 
; THIS SUBROUTINE TURNS ON THE CLOCK 
é 
INPUT: NONE 
; OUTPUT: NONE,ON SUBROUTINE EXIT, CLOCK IS ON 
; CALL: JSR PC, TIMON 
PEP TT TTT Tee TT TTT eT eTeTTTCTTTTTTTeTTTTT TTT TTT TT TTT TTT rr T TTT Trt TTT tte 
TIMON: 
SETPRI #PRIOS SET PROCESSOR PRIORITY TO 5 
MOV @PRIOS .RO 
TRAP  C$SPRI 
MOV @IE, @CLKCSR sENABLE CLOCK INTERRUPTS 
RTS PC ;RETURN TO CALLING ROUTINE 
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pone 


033512 








—E ss 
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SEQ 142 


f SERESESEEEESEESAEASESERESSEE SESE SEEESESEELELEAEEEEEASEESESEESESEESEEEEEEEEESES 


TINIT: 


3 
108: 
20$: 


SUBROUTINE - TINIT 
THIS SUBROUTINE IS CALLED AT THE BEGINNING OF A TEST 
TO DETERMINE IF A DEVICE RESET IS REQUIRED BEFORE 
THE REST OF THE TEST IS EXECUTED. 
INPUTS: NONE 
OUTPUTS: IF A DEVICE RESET IS NOT REQUIRED 

THEN CARRY = 0 

IF A DEVICE RESET IS REQUIRED 
THEN CARRY = 1 


CALLING SEQUENCE : 
JSR PC, TINIT 


ESSE EKEKEEESEEEEEEEEEEEEEEKEEEEEESEEEEEEESE E406 6640664646666 64664664464646464466 


SAVE R4 


MOV R4,-(SP) 
ATTEMPT TO CLEAR PCSRO UPPER BYTE 
INSURE YTE CLEAR 


JSR PC ,CLINTR 


MOVB @ZERO, @PCSRO LOWER 6B CL 
MOVB #ZERO, @PCSRO MAY REQ. TWO WRITES 
MOV SPCSRO ,R4 PCSRO = 0 ? 

BNE 0$ NO, A RESET IS REQUIRED 
MOV OPCSR1 ,R4 PCSRi -> R4 


MASK DELUA STATE 


CMP @READY .R4 STATE = READY ? 

BNE 10$ NO, A RESET IS REQUIRED 

CLC ; NO RESET REQUIRED, CLEAR CARRY 
BR 20$ 

SEC ; A RESET IS REQUIRED, SET CARRY 


MOV (SP)+,R4 RESTORE R4 
PC AND RETURN 





al 
' 
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GLOBAL MACRO AND SUBROUTINES SECTION 
5126 . TITLE MISCELLANEOUS SECTIONS 
5127 .SBTTL REPORT CODING SECTION 
5148 
5149 
5150 
5151 3+* 
5152 ; THE REPORT CODING SECTION CONTAINS THE 
aces ; “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 
22 
5155 
5156 033514 BGNRPT 
033514 LSRPT:: 
5157 
5158 
5159 033514 EXIT RPT 
673514 000167 «WORD J$JMP 
033516 000000 -WORD 1L10015-2-. 
5160 
5161 
5162 EVEN 
5163 
5164 033520 ENDRPT 
033520 
033520 104425 








———— - 





—nezz,zzzzszzlst, ssa tl Cl LL LLL LL LLL LL 
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SEQ 144 


5166 -SBTTL PROTECTION TABLE 

5167 

5168 se 

5169 ; THIS TABLE IS USED BY THE RUNTIME SERVICES 

5170 ; TO PROTECT THE LOAD MEDIA. 

5171 ;-- 

5172 

§173 033522 BGNPROT 

— 033522 L$PROT:: 
5175 033522 177777 -1 ;OFFSET INTO P-TABLE FOR CSR ADDRESS 
5176 033524 177777 -1 ;OFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
ae 033526 177777 -1 ;OFFSET INTO P-TABLE FOR DRIVE NUMBER 
5179 033530 ENDPROT 

5180 
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INITIALIZE SECTION 


5182 
5183 


5216 


005037 


012700 
104447 


103002 
000137 


012700 
104447 


103007 


012701 


005237 
012737 


012700 
104462 
010001 


103412 


012746 
012746 
010600 
104417 
062706 
000137 


016610' 
000036 


034310' 
000034 


000150 


000035 


000040 


016610' 
000001 016612’ 


000114 


021140' 
000001 


000004 
034302’ 


.SBTTL INITIALIZE SECTION 


3°? 
; THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 


; AT THE BEGINNING OF EACH PASS. 


Tl 
BGNINIT 


CLR DNIFLG 
READEF #EF .CONTINUE 


BNCOMPLETE i$ 
JMP 60$ 

1$: READEF #E€F.PWR 
BNCOMPLETE 3$ 


L$INIT:: 
sINIT EXPECT ONI FLAG 


;WAS A CONTINUE COMMAND — 
Vv 


TRAP 
NO, CONTINUE CHECK OF — 


;YES, LEAVE INIT CODE 
;WAS THERE A POWER a 
V 


TRAP 
BCC 


;NO 


: DELAY A PERIOD OF TIME CAPPROX 25 SECS ) FOR SELF TEST TO FINISH 


CLR RO 

2s DEC RO 
BNE 2s 
DEC Ri 
BNE es 

3$: READEF #EF .NEW 
BNCOMPLETE 20$ 
READEF #€F.START 
BNCOMPLETE 5$ 
RESET 


INC ONIFLG 
MOV #1,FRSTIM 
CLOCK L,Ri 


BCOMPLETE 4s 
PRINTF #NOCLK 


;INIT OUTER LOOP 
;INIT INNER LOOP 


sNEW PASS ? 

MOV 

TRAP 
;NO 

BCC 
sSTART ? 

MOV 

TRAP 
;NO 

BCC 


;CLEAR THE WORLD 

;SET TO EXPECT RESULTING ONI 

;SET FIRST TIME FLAG 

;GET LINE CLOCK INFO 
MOV 
TRAP 
MOV 


sERROR MESSAGE 


;CANNOT CONTINUE 


SEQ 145 


#EF . CONTINUE ,RO 
CSREFG 


1$ 

EF .PWR,RO 
CSREFG 

3$ 


#EF .START,RO 
CSREFG 


S$ 


#'L,RO 
CsCLCK 
RO,R1 


4s 


#1, -(SP) 
SP ,RO 
CSPNTF 
#4 ,SP 
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5259 
5260 
5261 
S262 


033670 
033674 
033676 
033702 
033706 
033712 
033716 
033716 
033722 
033726 
033732 
033736 
033740 


033744 
033746 
033752 
033760 


034154 


012137 
012102 
072227 
019237 
012137 
012137 


013746 
012746 
013746 
012746 
104437 
062706 


103365 
012137 
012137 
013737 
062737 
013737 
062737 
013737 
062737 
013737 
062737 


005737 
001502 
004737 
103057 


000246' 


000005 
000250' 
000252‘ 
000254 ' 


000250’ 
034430' 
000252’ 
000003 


000010 


016412' 
177777 
000244’ 
000244 ' 


000244' 


000224 ' 
000240' 
000224 ' 
000001 
000224 ' 
000002 
000226' 
000002 
000230’ 
000002 


016610’ 
026550' 
144106 
001400 


021202’ 
000001 


000004 
001000 


000244' 
000012’ 


000234 ' 
000234' 
000226 ' 
000226 ' 
000230‘ 
000230‘ 
000232‘ 
000232’ 


4%: 


5$: 
10$: 
20$: 


22$: 





ee 
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SEQ 146 

MOV (R1)+,CLKCSR ;LINE CLOCK CSR 

MOV C(R1)+,R2 ;GET CLOCK PRIORITY 

ASH #5 ,R2 

MOV R2,CLKBR 

MOV (R1)+,CLKVEC ; VECTOR 

MOV (R1i)+, CLKFRE ;F REQUENCY 

SETVEC CLKVEC,¢@CLKSRV,CLKBR ;SETUP CLOCK INTERRUPT VECTOR 
MOV CLKBR, -C SP) 
MOV #CLKSRV, -CSP) 
MOV CLKVEC ,-(SP) 
MOV $3 ,-CSP) 
TRAP C$SVEC 
ADD #10,SP 

BR 10$ 

CLR FRSTIM sCLEAR FIRST TIME FLAG 

MOV @-1,UNIT ;YES, INITIALIZE UNIT NUMBER 

INC UNIT :SET UP FOR NEXT UNIT 

CMP UNIT ,L $UNIT ;TESTED ALL AVAILABLE UNITS? 

BGT 50$ ;YES, LEAVE 7 

GPHARD UNIT,R1 ;GET P-TABLE POINTER FOR THIS UNIT 
MOV UNIT ,RO 
TRAP C$GPHRD 
MOV RO,R1 

BNCOMPLETE 20$ ;THIS ONE IS NOT ene - 

$ 

MGV (R1)+,PCSRO ;SAVE PCSRO 

MOV (R1)+, INTVEC ;SAVE VECTOR 

MOV PCSRO, PCSROUB ;SET UP ADDRESS OF UPPER BYTE OF PCSRO 

ADD #1, PCSROUB 

MOV PCSRO,PCSR1 ;SET UP PCSR1 

ADD #2,.PCSR1 

MOV PCSR1,PCSR2 ;SET UP PCSR2 

ADD #2 ,PCSR2 

MOV PCSR2.PCSR3 ;SET UP PCSR3 

ADD #2 ,PCSR3S 

;WAIT FOR DNI FROM PREVIOUS RESET IF APPROPRIATE 

TST DNIFLG sEXPECTING DNI TO BE SET? 

BEQ 60$ ;NO, SKIP DNI HANDLING 

JSR PC .CHKDNI ;WAIT FOR DONI 

BCC 30$ ;DNI? 

MOV @PCSRO,RO ;SAVE CONTENTS OF PCSRO 

BIT #USCI!FATL,RO ;uPROC. SUBSYSTEM FAILURE? 

BNE 22$ 3NO 

PRINTF #M68FLD ;YES, ISSUE ERROR MESSAGE 
MOV #M68FLD, -CSP) 
MOV #1,-CSP) 
MOV SP ,RO 
TRAP CSPNTF 
ADD #4,SP 

BR 50$ ;CANNOT CONTINUE 

BIT #FATL,RO ;DEVICE OR UNIBUS ERROR? 

BEQ 24$ 3NO 

PRINTF #DEVUNI ;YES, REPORT ERROR 
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5286 054330 012737 


034336 104411 


Ree ee ee 


0213106’ 
000001 


000004 


021501' 
000001 


000004 


030264' 


021575’ 
000001 


000004 


016612' 


016610' 
016620' 


001000 
000001 016620’ 





BR 50$ 
243: BIT a 


BEQ 2 
PRINTF #NIUNIB 


BR 50$ 
26$: PRINTF #UNDFND 


BR 50$ 
;DNI SET, SO CONTINUE 


30$: 
JSR PC ,CLRONI 
40$ 


PRINTF #DNICLR 


BR 50$ 
40$: BR 60$ 
50$: CLR FRSTIM 

DOCLN 
60$: CLR DNIFLG 

CLR PRNTIT 

RFLAGS RO 

BIT #PNT ,RO 

BEQ 70$ 

MOV #1,PRNTIT 
70$: 

ENDINIT 


ET 
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;CANNOT CONTINUE 
;NI OR UNIBUS HALTED? 


;NO 
:YES, REPORT ERROR 


;CANNOT CONTINUE 
;REPORT BITS IN ILLEGAL oo 


;UNABLE TO CONTINUE 


;YES, CLEAR IT 
;CONTINUE IF DNI CLEARED 
; ELSE ISSUE ERROR MESSAGE 


MOV 
MOV 
MOV 
TRAP 
ADO 
; AND EXIT 
;LEAVE 
;CLEAR FIRST TIME FLAG 
;ABORT PASS 
TRAP 
;CLEAR EXPECT DNI FLAG 
;CLEAR PRINT TEST ID FLAG 
;READ FLAGS 
TRAP 


;PRINT ENABLED? 





SEQ 147 


@DEVUNI, -C SP) 
#1,-C(SP) 


»RO 
CSPNTF 
4 ,SP 


@NIUNIB, -(SP) 
41,-CSP) 


SP ,RO 
CSPNTF 
$4 ,SP 


@UNDFND , -C SP ) 
#1,-CSP) 

SP RO 

CSPNTF 

$4 ,SP 


#DNICLR, -C SP) 
#1,-CSP) 

SP ,RO 

CSPNTF 

#4 ,SP 


CS$OCLN 


CSRFLA 


;NO, DON'T SET PRINT TEST ID FLAG 


;YES, SET FLAG 


L10017: 
TRAP 


CSINIT 





tem <email, CC LL LLL! LL LLL LLL LLL 
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5291 .SBTTL AUTODROP SECTION 
5292 
5293 544 
5294 ; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE Ir 
5295 ; THE “ADR” FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
5296 ; SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
5297 ; DROPPED FROM TESTING. 
5298 s-- 
5299 
5300 034340 BGNAUTO 

034340 L$AUTO:: 
5301 
5302 
5303 034340 ENDAUTO 

034340 


034340 104461 





SEQ 148 





.. ne sszyzzszssssszssssssrssiaamsssssamsassssie le, CC LL LLL! LLL 
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5305 .SBTTL CLEANUP CODING SECTION 
5306 
5307 ;¢* 
5308 ; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
5309 ; AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 
5310 3-- 
5311 
5312 034342 BGNCLN 
034342 L$CLEAN: : 
5313 
5314 
5315 034342 EXIT CLN 
034342 104432 TRAP 
- WORD 


034344 000002 


5316 

5317 

5318 .EVEN 

5319 

5320 034346 ENDCLN 
034346 


034346 104412 





SEQ 149 


CsExIT 
L10021-. 
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5329 
5330 
5331 
5332 


5337 


034350 
034350 


034350 
034350 000167 
034352 000000 


034354 
034354 
034354 104453 


Se 
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.SBTTL OROP UNIT SECTION 


;+e 
; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
; TO NO LONGER BE TESTED. 


BGNDU 


L$OU:: 
EXIT DU 
. WORD 
. WORD 
-EVEN 
ENDDU 


SEQ 150 


J$ IMP 
L10022-2-. 
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ADD UNIT SECTION 


SEQ 151 


5339 .SBTTL ADD UNIT SECTION 
5340 
5341 p++ 
5342 ; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
5343 ; TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
5344 ; TO THE TEST CYCLE. 
5345 $-- 
5346 
5347 034356 BGNAU . 
034356 LSAU:: 
5348 
5349 
5350 034356 EXIT AU 
034356 000167 -WORD J$JMP 
034360 000000 -WORD 1L10023-2-. 
5351 
5352 
5353 .EVEN 
5354 
5355 034362 ENDAU 
034362 


034362 104452 





—~ —- ssssssassssmmsmmssssll, eC LL LL LL 
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ADD UNIT SECTION 
+d .TITLE GLOBAL INTERRUPT SERVICE ROUTINES 
- .SBTTL ISRNXM - NON-EXISTANT MEMORY INTERRUPT SERVICE ROUTINE 
5361 SRRRERRAEARAAAAEAAAEEEAEEEAEEREEEAEEEREEAAEEEEE EE EEE EEE E EE EEEE EDEL EE BEES 
5362 $ 
aaa. ; FUNCTIONAL DESCRIPTION: 
F 

5365 ; THIS ROUTINE IS ASSIGNED TO VECTOR 4 BY THE ACCESS TESTS. 
5366 ; WHEN AN ACCESS IS ATTEMPTED ON NON-EXISTENT MEMORY 
oe : THE NEXMEM FLAG IS SET. 
5369 WUTTTTTTTTT TTT TTT TTT TT Tee etre rrr rrr 
5370 
5371 034364 BGNSRV ISRNXM 

034364 ISRNXM: : 
5372 034364 012737 000001 016604’ MOV #1,NEXMEM ;SET NXM FLAG 
5373 034372 ENDSRV 

034372 L10024: 

034372 000002 
5374 





SEQ 152 





nal 


—— 
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ISRNXM - NUN-EXISTANT MEMORY INTERRUPT SERVICE ROUTINE 
5376 
aoe .SBTTL ISRDNI - ONI INTERRUPT SERVICE ROUTINE 
5379 sRRAEREREREAEEEEREREREARERALEAREAEEEEAEEAAEEEEEEAAEREEEEESERED EE EE EE EEEEE 
5380 ; 
aeae ; FUNCTIONAL DESCRIPTION: 
; 
aan F wat _— IS ASSIGNED TO THE DELUA’S INTERRUPT VECTOR BY 
5385 WHEN AN INTERRUPT OCCURS THE DNIFLG FLAG IS SET IF ONI IS SET. 
; 
5387 sRRREEAAEEEREAEEEAEEREAREEEEEEAEEREEEREEEEEEAEEAEEEEEEAEEEEEES ASAE EE EEEES 
5388 
5389 034374 BGNSRV ISRDONI 
034374 ISRDNI: : 
5390 
5391 034374 010446 MOV R4,-CSP) ; SAVE R4 
5392 034376 005037 016610‘ CLR DNIFLG ; INSURE ONI FLAG IS CLEAR 
5393 034402 005004 CLR R4 ; INSURE R4 IS CLEAR 
5394 034404 017704 143614 MOV @PCSRO ,R4 ; PCSRO -> R4 
5395 034410 032704 004000 BIT #DNI ,R4 ; DNI SET? 
5396 034414 001403 BEQ 10$ ; NO, EXIT 
5397 034416 012737 000001 016610’ MOV #1,ONIFLG ; YES, SET ONIFLG FLAG 
aaa 024424 012604 10$: MOV (SP)+,R4 ; RESTORE R4 
5400 034426 ENDSRV 
034426 L10025: ore 


034426 000002 





po 


5418 034430 
034430 
5419 034430 
5420 034434 
5421 034436 
5422 034442 
5423 034442 
024442 
034442 








005737 
001402 
005337 


000002 


————— ee ee —— Eee 


GLOBAL INTERRUPT SERVICE ROUTIN MACRO YOS.02 Friday 12-Jul-85 09:33 Page 85 
ISRONI - ONI INTERRUPT SERVICE ROUTINE 


016602’ 
016602’ 


fs SRSERAEREASESLSSE ASSESS SESESS SESE SEEAEEEESESEEEAESESERESEAESESSAAEEES 


: 
;FUNCTIONAL DESCRIPTION: 


; THIS ROUTINE COUNTS A PRESET NUMBER OF CLOCK TICKS THEN IT 
i TURNS THE CLOCK OFF 


SINPUTS: METER 

t 

; OUTPUTS : METER 

; 

“ROUTINES CALLED: NONE 


; 
sRRaEAEREAARASASAAESEEASERESSSALEAEAEEESEELESEEEEEAEEEEEEEEEEEDEEEES 


BGNSRV CLKSRV 
CLKSRV:: 
TST METER sHAS THE METER EXPIRED? 
BEQ 20$ ;YES, STOP COUNTING 
DEC METER ;COUNT TICKS 
203: 
ENDSRV 





- err CE LL eee 
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ISRONI - DONI INTERRUPT SERVICE ROUTINE 





oa . TITLE HARDWARE TESTS 
a. .SBTTL TEST 1: PCSRO READ ACCESS TEST 
5461 sPRb Shh EhEh SEES SEEEEEEEEEEEEEEEEEEDEEEEEEEEEE EE ODEDS OO 06406606666668400068 
5462 : 
5463 ; THIS TEST WILL VERIFY THAT A DEVICE IS PRESENT AT THE PCSRO 
sone $ UNIBUS ADDRESS SPECIFIED. 
; 
5466 ; TEST SEQUENCE: 
5467 ; 1. READ PCSRO 
5468 : 
5469 [RRaREEAREERESERERERAREEEEEEEEEEEEEESEESEEEE ESOS OS OE EE6E E464 5444400858488 
5470 
5471 034444 BGNTST 
034444 Ti:: 
5472 
5473 034444 PNTMAC TOLID 
034444 012704 034570' MOV @TOLID ,.R4 ;GET POINTER TO TEST NAME MESSAGE 
034450 004737 032734' JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
3 END OF MACRO EXPANSION OF ‘'PNTMAC’ 
5474 034454 SETVEC #4,@ISRNXM, OPRIO7 ; SET UP TIMEOUT TRAP VECTOR 
034454 012746 000340 MOV OPRIO7 . -CSP) 
034460 012746 034364' MOV SISRNXM, -CSP) 
034464 012746 000004 MOV 04 ,-CSP) 
034470 012746 000003 MOV @3,-CSP) 
034474 104437 TRAP Cs$SVEC 
034476 062706 000010 #10,SP 
5475 034502 005037 016604' CLR NE XMEM ; CLEAR NXM TIMEOUT FLAG 
5476 034506 CLR R2 ; R2 = WHICH PCSR IS BEING TESTED 
5477 034510 012777 004 143506 MOV #4000, 8PCSRO ; DOES PCSR EXIST? 
5478 034516 005737 016604’ TST NE XMEM 
5479 034522 001413 BEQ 10$ ; YES 
5480 034524 CLRVEC #4 
034524 012700 000004 MOV #4 ,RO 
034530 104436 TRAP CsCveECc 
5481 034532 ERRDF 001,ERRO01,MSGO01 ; NO, PRINT DEVICE FATAL ERROR MESSAGE 
034532 104455 TRAP CSERDOF 
034534 000001 -WORD 1 
034536 022660' -WORD ERROOI 
034540 021664' -WORD MSGOO1 
5482 034542 DODU UNIT ; DROP UNIT 
034542 013700 000244' MOV UNIT ,RO 
034546 104451 TRAP C$D0DU 
5483 034550 DOCLN 
034550 104444 TRAP CS$DCLN 
5485 034552 10$: CLRVEC 4 
034552 012700 000004 MOV 04 ,RO 
034556 104436 TRAP CscveECc 
pe 034560 004737 030346' JSR PC ,CLINTR s INSURE DELUA INTR ARE CLEAR 
5488 034564 EXIT TST 
034564 104432 TRAP CSsEXIT 








- EE al 
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TEST 1: PCSRO READ ACCESS TEST 


034566 000034 
5489 
5490 





st ;LOCAL TEST MESSAGE 

1 

5492 034570 104 105 114 TO1ID:.ASCIZ ‘DELUA PCSRO READ ACCESS ' 
034573 040 


034576 120 103 123 


034620 000 

5493 .EVEN 

5494 

5495 034622 ENDTST 
034622 
034622 104401 


5496 
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5513 
5514 











a ET 
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TEST 2: PCSR1 READ ACCESS TEST 


012704 
004737 


012777 


034756' 
032734' 


004000 


000340 
034364‘ 
000004 
000003 


000010 
016604 ' 
000001 


143322 
016604 ' 


000004 


000244' 


000004 
030346' 


143362 


.SBTTL TEST 2: PCSRi READ ACCESS TEST 





SEQ 157 


FS SSSAESSSAEAASESASESESSSSAASESESSEASHSSEEEASEEHALESESEEAEEEEEAESESEEEEES 


THIS TEST WILL VERIFY THAT A DEVICE IS PRESENT AT THE PCSR1 


10$: 


UNIBUS 


ADDRESS SPECIFIED. 


TEST SEQUENCE: 


BGNTST 


PNTMAC 


MOV 
JSR 


1. READ PCSR1 


TO2TD 


#TO2TD .R4 
PC .PNTID 


T2:: 


END OF MACRO EXPANSION OF ‘PNTMAC’ 


MOV 
SETVEC 


BEQ 
CLRVEC 


ERRDF 


DODU 


DOCLN 
CLRVEC 


JSR 
EXIT 


#4000, @PCSRO 
$4, @ISRNXM, #PRIO7 


002, ERROO1,MSGO01 


UNIT 


#4 


PC ,CLINTR 
TST 


; INSURE DNI CLEAR 
; SET UP TIMEOUT TRAP a 


; CLEAR NXM TIMEOUT FLAG 


SEEARAAASSAALAAAAAAAALALSEAASLEAAAAEAAAEEASAAEASEASLSESASSESEAASSESEAEDAESEAEESES 


;GET POINTER TO TEST NAME MESSAGE 
;PRINT TEST NUMBER AND NAME 


#PRIO7 ,-CSP) 
#ISRNXM, -CSP) 
#4,-C(SP) 

#2 ,-CSP) 
C$SVEC 

#10,SP 


; R2 = WHICH PCSR IS BEING TESTED 


; DOES PCSR EXIST? 


; YES 
MOV #4,R0 
TRAP CsCveECc 
; NO, PRINT DEVICE FATAL FRROR MESSAGE 
TRAP CSERDF 
-WORD 2 
-WORD ERROOL 
-WORD MSGOO1 
; DROP UNIT 
MOV UNIT ,RO 
TRAP C$DODU 
; AND ABORT PASS 
TRAP CSOCLN 
MOV #4,RO 
TRAP CsCVEC 
s INSURE PCSRO INTR ARE CLEARED 
TRAP CSEXIT 
.WORD L10030-. 





sae 





—— ieee 
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TEST 2: PCSR1 READ ACCESS TEST 
aan ;LOCAL TEST MESSAGE 
5531 034756 104 105 114 TO2ID:.ASCIZ ‘DELUA PCSR1 READ ACCESS ' 
034761 125 101 040 
034764 120 103 123 
034767 122 061 040 
034772 122 105 101 
034775 104 040 101 
035000 103 103 105 
035003 123 123 040 
035006 000 
5532 EVEN 
5533 
5534 035010 ENDTST 
035010 L10030: 
TRAP CsETST 


035010 104401 
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5572 
5573 


035116 


035120 
035120 
035124 
035130 
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TEST 2: PCSR1 READ ACCESS TEST 


017701 
142701 
122701 


035172‘ 
032734' 


033434’ 
004100 
000140 
027736' 


026652 ' 


030264 ' 
026652 ' 


**3102 
000217 
000020 


143166 
143160 


SEQ 159 
_SBTTL TEST 3: PCSR1 DELUA ID BIT TEST 
FeRRRAERELSRAEERASAEEESAAESEAEEEARERAAGAEAESEAASESEEEEEEEEEAESESESEEEREEEES 
; THIS TEST VERIFIES THAT BIT 06, AND NO OTHER BITS IN THE 
: PCSRi DEVICE ID FIELD IS SET. 

; 
; TEST SEQUENCE: 
: . READ PCSR1 
Se i ssasmninslinate 
BGNTST 
T3:: 
PNTMAC TO3ID 
MOV @TO3ID,R4 ;GET POINTER TO TEST NAME MESSAGE 
JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ;IS A DEVICE RESET NEEDED? 
BCC 208 ;NO 
MOV #DNI+INTE, @PCSRO : PRECONDITION INTR ENABLE 
MOVB  #INTE+RSET,@PCSRO ;RESET DELUA 
JSR PC ,CKDNI ;DNI? 
BCC 10$ ;YES 
JSR PC ,CHKFTL ;FATAL BIT SET? 
ERRHRD 003,ERRO06,MSGO03 ;NO, REPORT ERROR 
RAP §_ C$ERHRD 
WORD 3 
.WORD ERROOE 
.WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP C$ESCAPE 
-WORD L10031-. 
10$: 
JSR PC ,CLRONI ;WRITE 1 TO CLEAR DNI 
BCC 20$ 30K TO CONTINUE 
JSR PC, CHKFTL ;FATAL BIT SET? 
ERRHRD 004,ERROO6,MSGO03 ;NO, REPORT ERROR 
RAP  C$ERHRD 
WORD 4 
-WORD ERROOG 
.WORD MSGO0O3 
ESCAPE TST ; AND ABORT TEST 
TRAP  C$ESCAPE 
.WORD L10031-. 
20$: 
MOV @PCSR1,R1 ;GET CONTENTS OF PCSR1 
BICB $217,R1 ;CLEAR UNWANTED BITS 
CMPB #20,R1 ;ONLY BIT4 SET? 








— eae 
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TEST 3: PCSRi DELUA ID BIT TEST 


5574 035134 001412 BEQ 


SEQ 160 


:YES, SKIP ERROR REPORT 


5575 
5576 


035136 
035142 
035142 
035144 
035146 
035150 
035152 
035152 
035156 


035160 
035160 
035162 
035162 


035166 
035166 
035170 


035172 


035216 


004737 
104455 
000005 
0256 76' 
000000 
013700 
104451 
104444 


004737 


104401 


026652 


000244' 


030346 ' 


30$ 
JSR PC ,CHKFTL 
ERRDF 005,ERRO40 


DODU UNIT 


DOCLN 


30$: 
JSR PC,CLINTR 


EXIT TST 


;LOCAL TEST MESSAGE 
TO3ID: .ASCIZ ‘DELUA PCSR1i ID BIT ' 


.EVEN 
ENDTST 


;sFATAL BIT SET? 


;ILLEGAL ID, DROP UNIT 


AND ABORT PASS 


TRAP C$OCLN 


;INSURE DELUA INTR BIT CLEAR 


TRAP CSEXIT 
-WORD L10031-. 


L1i0031: 
TRAP CSETST 








eee 


SEQ 161 
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TEST 4: PCSR2 READ ACCESS TEST 


a -SBTTL TEST 4: PCSR2 READ ACCESS TEST 
a seeRRESEAEEEEEAEEAEASAGAAEAREAEEEAEEEEEEEADAEAAEBERE DEES EEEE EERE EE EEEE EES 
596 
5597 ; THIS TEST WILL VERIFY THAT A DEVICE IS PRESENT AT THE PCSR2 
Fate: ; UNIBUS ADDRESS SPECIFIED. 
5600 ; TEST SEQUENCE: 
5601 : 1. READ PCSR2 
5602 ; 
5603 sae RAEEERARERAEREEEAEAARRAEEEEEEEAEEAEAAREEEEEEEEEEEEEEEEEEEEEE REESE ERED SE 
5604 
5605 035220 BGNTST 
035220 T4:: 
5606 
5607 035220 PNTMAC TO4ID 
035220 012704 035352’ MOV #TO4ID ,R4 ;GET POINTER TO TEST NAME MESSAGE 
035224 004737 032734' JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC’ 
5608 035230 012777 004000 142766 MOV #4000, @PCSRO ; INSURE DNI CLEAR 
5609 035236 SETVEC #4,#ISRNXM,@PRIO7 ; SET UP TIMEOUT TRAP VECTOR 
035236 012746 000340 MOV #PRIO7 ,-CSP) 
035242 012746 034364' MOV #ISRNXM, -C SP) 
035246 012746 000004 MOV #4,-CSP) 
035252 012746 000003 MOV #2 ,-(SP) 
035256 104437 TRAP C$SVEC 
035260 062706 000010 D #10,SP 
5610 035264 005037 016604’ CLR NEXMEM ; CLEAR NXM TIMEOUT FLAG 
5611 035270 012702 000002 MOV #2 ,R2 ; R2 = WHICH PCSR IS BEING TESTED 
5612 035274 017701 142730 MOV aPCSR2 ,R1 ; DOES PCSR EXIST? 
5613 035300 005737 016604' TST NE 
5614 035304 001413 BEQ 10$ ; YES 
5615 035306 CLRVEC #4 
035306 012700 000004 MOV #4 ,RO 
035312 104436 TRAP C$CVEC 
5616 035314 ERRDF 006,ERRO01,MSGO01 ; NO, PRINT DEVICE FATAL ERROR MESSAGE 
035314 104455 TRAP CSERDF 
035316 000006 -WORD 6 
035320 022660' -WORD ERROOL 
35322 021664’ -WORD MSGOO1 
5617 035324 DODU UNIT ; DROP UNIT 
35324 013700 000244' MOV UNIT ,.RO 
35330 104451 TRAP C$D0DU 
5618 035332 DOCLN 
anes 35332 104444 TRAP C$DCLN 
5620 035334 10$: CLRVEC #4 
035334 012700 000004 MOV #4 ,RO 
035340 104436 TRAP CsCVvEC 
aans 035342 004737 030346' JSR PC .CLINTR sINSURE DELUA INTR BITS CLEAR 
5623 035346 EXIT TST 
035346 104432 TRAP CSEXIT 
035350 000034 -WORD L10032-. 





al 





_— — 
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TEST 4: PCSR2 READ ACCESS TEST 
bo ;LOCAL TEST MESSAGE 
5627 035352 104 105 114 TO4ID:.ASCIZ ‘DELUA PCSR2 READ ACCESS ' 
035355 125 101 040 
035360 120 103 123 
035363 122 062 040 
035366 122 105 101 
035371 104 040 101 
035374 103 103 105 
035377 123 123 040 
035402 000 
5628 EVEN 
5629 
5630 035404 ENDTST 
035404 L10032: 
TRAP CSETST 


035404 104401 
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TEST 5: PCSR3 READ ACCESS TEST 


5646 
5647 


035520 


035522 
035522 
035526 
035530 


035534 
035534 
035536 


012704 
004737 


012777 


035540' 
032734' 


000244 ' 


800004 


030345' 


142600 


.SBTTL TEST 5: PCSR3 READ ACCESS TEST 





LL LE LL A LLL LLL LL LLL LLL LLL LL LLL LL 


SEQ 163 


s RAEREARAERESLAAEEEAEEAEREESAESEAASASEEAEKERALEAESAALESEAEAEERESEEEEADEE SEES 


THIS TEST WILL VERIFY THAT A DEVICE IS PRESENT AT THE PCSRS 
UNIBUS ADDRESS SPECIFIED. 


TEST a 


10$: 


BGNTST 
PNTMAC 


MOV 
JSR 


MOV 
SETVEC 


DODU 
DOCLN 
CLRVEC 


JSR 
EXIT 


1. READ PCSR3S 


TOSID 
#TOSID,R4 


PC ,PNTID 
END OF MACRO EXPANSION OF ‘PNTMAC' 


#4000, @PCSRO 
#4 , GISRNXM, ¢PRIO7 


NEXMEM 

#3 ,R2 
@PCSR3,R1 
NEXMEM 
10$ 

ae) 


007, ERROO1 ,.MSGOO1 


UNIT 


74 


PC ,CLINTR 
TST 


sSEKKAKAEAAKALAREAALAEEAERAARAKAABRERAAAKEALARAABRASESAEAEEEASAEAREAEELESASEAAEEES 


T5:: 


;GET POINTER TO TEST NAME MESSAGE 
;PRINT TEST NUMBER AND NAME 


INSURE DNI CLEAR 
SET UP TIMEOUT TRAP VECTOR 


MOV @PRIO7,-CSP) 
MOV #ISRNXM. -CSP) 
MOV #4 ,-(SP) 

TRAP C$SVEC 

ADD #10,SP 


CLEAR NXM TIMEOUT FLAG 
R2 = WHICH PCSR IS BEING TESTED 
DOES PCSR EXIST? 


YES 
MOV #4 ,RO 
TRAP CsCVEC 
NO, PRINT DEVICE FATAL ERROR MESSAGE 
TRAP CSERDF 
-WORD 7 
-WORD ERROO1L 
-WORD MSGOO1 
DROP UNIT 
MOV UNIT ,RO 
TRAP C$DODU 
AND ABORT PASS 
TRAP C$DCLN 
MOV #4 ,RO 
TRAP CsCvEC 
INSURE DELUA INTR BITS DISABLED 
TRAP CS$EXIT 
-WORD L10033-. 








LEE LL EEE Err 
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TEST 5S: PCSR3 READ ACCESS TEST 


035565 123 
035570 000 
5666 
5667 
5668 035572 
035572 
035572 104401 


123 
040 
101 
101 
105 
040 


;LOCAL TEST MESSAGE 
i TOSID: .ASCIZ ‘DELUA PCSR3 READ ACCESS ' 


EVEN 


ENDTST 


L10033: 


TRAP 


SEQ 164 


CSETST 


opayaaee auaae 


—_ nena 
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TEST 6: PCSR2 STATIC BIT TEST 
ae .SBTTL TEST 6: PCSR2 STATIC BIT TEST 
5672 sRREREEEASELELES SEER EEEEASASEAEESAEEEEASEADEEAEEREEEDEEEEAES SAEED ED EE EES 
5673 ; 
5674 ; THIS TEST WILL CHECK PCSR2 FOR ALL SAO AND SA1i ERRORS. 
5675 : THE HOST WILL WRITE PATTERNS TO PCSR2 AND READ THEM 
ot : BACK TO VERIFY. 
; 
5678 : NOTE: PCSR2 BITOO SHOULD ALWAYS BE A ZERO. 
ara ; THIS BIT WILL BE MASKED BEFCRE DOING THE COMPARE. 
; 
5681 ; TEST SEQUENCE: 
5682 3 1. WRITE PATTERN TO PCSR2 
5683 : 2. COMPARE MASKED PATTERN WITH PCSR2 CONTENTS 
a ; 3. REPEAT STEPS 1 AND 2 FOR ALL PATTERNS 
; 
5686 [RRA AEASAREREREREAEEEA EERE EEEEEEEAEEADEEEADEESEE ESSA EEE EE EE EE ES EEE EDS 
5687 
5688 035574 BGNTST 
035574 T6:: 
5689 
5690 035574 PNTMAC TO6ID 
025574 012704 035760’ MOV #TO6ID ,R4 ;GET POINTER TO TEST NAME MESSAGE 
035600 004737 032734’ JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF 'PNTMAC‘ 
5691 
5692 035604 004737 033434' JSR PC, TINIT 31S A DEVICE RESET NEEDED? 
5693 035610 103034 BCC 25$ NO 
5694 035612 012777 004100 142404 MOV #DNI+INTE, @PCSRO ;PRE-CONDITION INTR ENABLE 
5695 035620 112777 000140 142376 MOVB #INTE+RSET ,@PCSRO ;RESET DELUA 
5696 035626 004737 027736' JSR PC ,CKDNI ;O0NI? 
5697 035632 103010 BCC 15$ sYES 
5698 035634 004737 026652’ JSR PC ,CHKFTL sFATAL BIT SET? 
5699 035640 ERRHRD 008. ,ERROO6,MSGOOS ;NO, REPORT ERROR 
035640 104456 TRAP CSERHRD 
035642 000010 -WORD 8 
035644 023030' -WORD ERROOG 
035646 021736' ; -WORD MSGOOS 
5700 035650 ESCAPE TST ; AND ABORT TEST 
035650 104410 TRAP CSESCAPE 
035652 000136 -WORD L10034-. 
5701 035654 15$: 
5702 035654 004737 030264’ JSR PC ,CLRONI ;sWRITE 1 TO CLEAR DNI BIT 
5703 035660 103010 BCC 25$ 3;NO 
5704 035662 004737 026652’ JSR PC ,CHKFTL ;FATAL BIT SET? 
5705 035666 ERRHRD 010. ,ERROO6,MSGO03S ;YES, REPORT ERROR 
035666 104456 TRAP CSERHRD 
035670 000012 WORD 0 
035672 023030’ WORD ERROOG 
035674 021736’ WORD MSGOO3 
5706 035676 ESCAPE TST ; AND ABORT TEST 
035676 104410 TRAP CSESCAPE 
ane 035700 000110 -WORD 1L10034-. 
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TEST 6: PCSR2 STATIC BIT TES 


035702 


035702 
035706 
035712 


035714 
035720 
035724 
035726 


036010 
036010 
036010 


012701 
012705 
012103 


010377 


022710' 
021710° 


005305 
001361 


004737 


104432 
000032 
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25%: 
016626’ MOV #PATRN1I,R1 ; GET ADDRESS OF DATA PATTERNS 
000004 MOV 04,R5 ; COUNT 4 PATTERNS (PASSES) 
30$: MOV (R1)+,R3 ; DATA PATTERN -> R3 
142310 MOV R3,8PCSR2 ; DATA PATTERN -> PCSR2 
142304 MOV aPCSR2 ,R4 ; READ PCSR2 
CMP R3,R4 ; DATA COMPARE? 
BEQ 50$ ; YES, CONTINUE 
026652‘ JSR PC ,CHKFTL ; FATAL BIT SET? 
ERRHRD 011.,ERROO2,MSGO02 ; NO, REPORT ERROR 
RAP CSERHRD 
-WORD ERROO2Z 
«WORD mSGO02 
50$: 
DEC RS ; DONE? 
BNE 30$ ; NO 
030346 ' JSR PC ,.CLINTR ; INSURE DELUA INTR BITS CLEAR 
EXIT TST 
TRAP CSEXIT 
-WORD L10034-. 
;LOCAL TEST MESSAGE 
105 114 TO6ID:.ASCIZ ‘DELUA PCSR2 STATIC BIT ' 
101 040 
103 123 
062 040 
124 101 
111 103 
102 111 
040 000 
-EVEN 
ENDTST 
L10034: 
TRAP CSETST 


104401 





: -_ ee TE EL EL LLL LLL LLL LLL LA GBT ss:¥*"-s-¥——_ eee 
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TEST 7: PCSR3 STATIC BIT TEST 
— .SBTTL TEST 7: PCSR3 STATIC BIT TEST 
5738 sRRSEEEESRESEREESEEE EE EEEEEEEEEEEEEEEEEDDADEEDEEEEDSE OO EEEEEEEEEEEE DEED EES 
5739 ; 
5740 ; THIS TEST WILL CHECK PCSR3 FOR ALL SAO AND SA1 ERRORS. 
5741 ; THE HOST WILL WRITE PATTERNS TO PCSR3 AND READ THEM 
eeat ; BACK TO VERIFY. 
5744 : NOTE: PCSR3 BITO2 THRU BITi1S SHOULD ALWAYS BE A ZERO. 
= : THESE BITS WILL BE MASKED 3EFORE DOING THE COMPARE. 
; 
5747 ; TEST SEQUENCE: 
5748 ; 1. WRITE PATTERN TO PCSR3 
5749 : 2. COMPARE MASKED PATTERN WITH PCSR3 CONTENTS 
zone : 3. REPEAT STEPS 1 AND 2 FOR ALL PATTERNS 
5752 ETT TTT TTTTT TT TTT TTTTTTTTTTITTTTTTTTTITTT TIT TTT TTT Titi tit Teter 
5753 
5754 036012 BGNTST 
036012 T7:: 
5755 
5756 036012 PNTMAC TO7ID 
026012 012704 036176' MOV #TO7ID ,R4 ;GET POINTER TO TEST NAME MESSAGE 
036016 004737 032734’ JSR PC ,PNTID sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
5757 
5758 036022 004737 033434' JSR PC, TINIT :I1S A DEVICE RESET NEEDED? 
5759 036026 103034 BCC 20$ 3;NO 
5760 036030 012777 004100 142166 MOV @ONI+ INTE, @PCSRO S PRE -CONDITION -_ ENABLE 
5761 036036 112777 000140 142160 MOVE #INTE+RSET ,.@PCSRO ;YES, RESET DELU 
5762 036044 004737 027736’ JSR PC ,CKDNI ;DNI SET? 
5763 036050 103010 BCC 10$ ;YES 
5764 036052 004737 026652’ JSR PC ,CHKFTL sFATAL BIT SET? 
5765 036056 ERRHRD 012. ,ERROO6,MSGO0S ;NO, REPORT ERROR 
036056 104456 TRAP CSERHRD 
036060 000014 WORD 
036062 023030' -WORD ERROOS 
036064 021736' -WORD MSGOOS 
5766 036066 ESCAPE TST ; AND ABORT TEST 
0 104410 TRAP CSESCAPE 
036070 000136 -WORD .L10035- 
5767 036072 10$: 
5768 036072 004737 030264’ JSR PC ,.CLRONI ;sWRITE 1 TO CLEAR DONI BIT 
5769 036076 103010 BCC 20$ ;CLEARED OK 
5770 036100 004737 026652’ JSR PC ,CHKFTL sFATAL BIT SET? 
5771 036104 ERRHRD 013. ,ERROO6,MSGOO3S ;NO, REPORT ERROR 
036104 104456 TRAP CSERHRD 
936106 000015 WORD 3 
036110 023030’ WORD ERROOS 
036112 021736’ WORD ™MSGOO3 
5772 036114 ESCAPE TST ; AND ABORT TEST 
036114 104410 TRAP CSESCAPE 


036116 000110 -WORD L10035-. 





HARDWARE TESTS 
PCSR3 STATIC BIT TEST 


TEST 7: 


5798 
5799 
5800 


<a 


036166 


036172 
036172 
036174 





012103 
010377 


022746' 
021710’ 


005305 
001361 


004737 


104432 
000032 


—— 
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20%: 
016626’ MOV @PATRNI,R1 ; GET ADDRESS OF DATA PATTERNS 
000004 MOV 04,R5 ; COUNT 4 PATTERNS (PASSES) 
40$: MOV CR1i)+, RS ; DATA PATTERN -> R3 
142074 MOV R3,9PCSR3 ; DATA PATTERN -> PCSR3 
142070 MOV @PCSR3,R4 ; READ PCSR3 
CMP R3,R4 ; DATA COMPARE? 
BEQ 50$ ; YES, CONTINUE 
026652‘ JSR PC ,CHKFTL ; FATAL ERROR BIT SET? 
ERRHRD 014. ,ERROOS,MSGOO02 ; NO, REPORT ERROR 
TRAP CSERHRD 
«WORD 14 
-WORD ERROOS 
-WORD MSGO02 
50$: 
DEC RS ; DONE? 
BNE 40$ ; NO 
030346 ' JSR PC ,CLINTR ; INSURE INTR BITS ARE CLEAR 
EXIT TST 
TRAP CSExIT 
-WORD 1L10035-. 
;LOCAL TEST MESSAGE 
105 114 TO7ID:.ASCIZ ‘DELUA PCSR3 STATIC BIT ' 
101 040 
103 123 
063 040 
124 101 
i111 103 
102 111 
040 000 
-EVEN 
ENDTST 
L10035: 
TRAP CsETST 


104401 
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TEST 8: SELF TEST 


SEQ 169 


aooe .SBTTL TEST 8: SELF TEST 
5804 5 Obb6O6666 606006 45 0640 0004 04 OE EOE EE SEES OEESEEEEEEEEEESEEEEEEEEEEEEEEES 
5805 ; 
5806 ; THIS TEST VERIFIES THAT THE ROM BASED SELF TEST 
5807 ; CAN BE RUN SUCCESSFULLY WHEN INVOKED VIA 
aes ; THE SELF TEST PORT COMMAND. 
; 
5810 ; TEST a 
5811 ; 1. ISSUE THE SELF TEST PORT COMMAND 
5812 ; 2. WAIT FOR DNI 
58613 : 3. CHECK LITE BITE REGISTER FOR SUCCESSFUL SELF TEST 
ae : 4. WRITE ONE TO CLEAR ONI 
; 
5816 ahh bhoheedheh Shhh ehhh ba SEEKERS REESE EE EEEEEEEEEEEE OSES EES ODES 444404088 
5817 
5818 036230 BGNTST 
036230 T8:: 
5819 
5820 036230 PNTMAC TO8ID 
036230 012704 036534' MOV @TO8ID ,.R4 sGET POINTER TO TEST NAME MESSAGE 
036234 004737 032734’ JSR PC ,PNTID sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
5821 036240 004737 033434' JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
5822 036244 103034 BCC 25$ 3; NO 
5823 036246 012777 004100 141750 MOV @ONI+INTE, BPCSRO ; SET INTERRUPT ENABLE 
5824 036254 112777 000140 141742 MOVB @INTE! RSET ,@PCSRO ; YES, RESET DELUA 
5825 036262 004737 027736' JSR PC ,CKONI ; ONI ? 
5826 036266 103010 BCC 20$ ; YES 
5827 036270 004737 026652’ JSR PC ,CHKFTL ; FATL BIT SET? 
5828 036274 ERRHRD 015. ,ERROO6,MSGO03S ; NO, REPORT ERROR 
036274 104456 TRAP CSERHRD 
036276 000017 -WORD 15 
036300 023030' -WORD ERROOG 
036302 021736' -WORD MSGOO3 
5829 036304 ESCAPE TST ; AND ABORT TEST 
036304 104410 TRAP CSESCAPE 
anne 036306 000246 -WORD L10036-. 
; 
5831 036310 004737 030264' 208: JSR PC .CLRONI ; WRITE ONE TO CLEAR DONI 
5832 : ERROR 
5833 036314 103010 Bcc 25% ; NO 
5834 036316 004737 026652‘ JSR PC .CHKFTL ; FATL BIT SET? 
5835 036322 ERRHRD 016. .ERROOG.MSGOO3 ; YES, REPORT ERROR 
036322 104456 TRAP CSERHRD 
036324 000020 WORD 16 Fe 
036326 023030' -WORD ERROOS 
036330 021736' .WORD MSGOO03 
5836 036332 ESCAPE TST ; AND ABORT 
036332 104410 TRAP CSESCAPE 
— 036334 000220 -WORD 1L10036-. 
5838 036336 $: 
5839 036336 012777 004100 141660 MOV ; PRE-CONDITION INTR ENABLE 





@ONI + INTE, @PCSRO 





TEST 8: 





SELF TEST 


5840 036344 


5874 


036352 
036356 


036502 
036504 
036510 
036510 
036512 
036514 
036516 
036520 


112777 
004737 
103025 


013700 
042700 
005700 
001006 


104456 
000021 
023414’ 
022632’ 


104432 
000146 


026426 ' 
022632’ 


104432 
000124 


004737 
103017 
013704 
006304 
062704 
011437 
004737 


104456 
000024 
623004 ' 
021770' 


104410 
000060 


004737 


103010 
004737 


104456 
000025 
023030' 
021736’ 


000103 141652 


027736° 


016514‘ 
172377 


001000 


027420' 
016600' 
036560' 


036556‘ 
026652' 


030264 ' 


026652 ' 


30$: 


35$: 


é 
40$: 


MOVB @INTE+SLFT,@PCSRO 
JSR PC ,CKONI 
BCC 35$ 
sFIND OUT WHY SELF TEST DID NOT COMPLETE 
MOV EPCSRO,RO 
BIC @STATEM,RO 
TST RO 
BNE 30$ 
ERRHRD 017. ,ERRO11,MSGO11 
EXIT TST 
BIT @FATL,RO 
BEQ 35$ 
ERRHRD 018. ,ERRO46,MSGO11 
EXIT TST 
JSR PC ,CHKSTR 
BCC 40$ 
MOV ECODE .R4 
ASL R4 
ADO @STTBL .R4 
MOV CR4),STMSG 
JSR PC ,CHKFTL 
ERRHRD 020. ,ERROOS,MSGO04 
ESCAPE TST 
JSR PC ,CLRONI 
BCC 50$ 
JSR PC ,,CHKFTL 
ERRHRD 021. ,ERROO6,MSGOOS 
ESCAPE TST 
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eS LTT 


RUN SELF TEST 
SELF TEST COMPLETED OK? 
YES, CHECK RESULTS 


NO, GET CONTENTS OF PCSRO 
MASK UNWANTED BITS 
68000 SUBSYSTEM FAULT 


NO 
YES, REPORT ERROR 


AND EXIT TEST 


_— OR UNIBUS ERROR? 
YES, REPORT ERROR 


AND EXIT TEST 


SELF TEST SUCCESSFUL ? 
YES 


NO, SET UP TO PRINT ERROR 
SHIFT CODE FOR INDEX 

INDEX INTO SELF TEST TABLE 
LOAD INTO SELF TEST MESSAGE 
FATL BIT SET? 

REPORT SELF TEST a 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR? 


NO 
FATL BIT SET 
YES, REPORT ERROR 


AND ABORT 





SEQ 170 


CSERHRD 
17 


ERRO1L1 
MSGO11 


CSExIT 
L10036-. 


CSERHRD 


CSExIT 
L10036-. 


CSERHRD 
20 
ERROOS 


CSESCAPE 
L10036-. 
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TEST 8: SELF TEST 


5875 
5876 


036520 
036522 
036524 
036524 


036530 
036530 
036532 


036534 
036537 
036542 
036545 
036550 
036553 


036554 
036554 
036554 


104410 
000032 


004737 


104401 


030346‘ 


105 
101 
105 
124 
124 


114 
040 
114 
105 
040 


= EEE ees aE ¢ caS O80 os} ERR AES 


SEQ 171 
TRAP  CSESCAPE 
ea .WORD 110036-. 
— PC ,CLINTR ; INSURE DELUA INTR BITS CLEAR 
EXIT TST 
TRAP CSEXIT 
.WORD 1L10036-. 
;LOCAL TEST MESSAGE 
TOBID: .ASCIZ ‘DELUA SELFTEST 
EVEN 
ENDTST 
L10036: 
TRAP CSETST 
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SELF TEST 


TEST 8: 


036556 


036720 





nal 


MACRO Y05.02 Friday 12-Jul-85 09:33 Page 97 


000000 


036722’ 
036745’ 
036761’ 
036775' 
037011’ 
037025’ 
037041° 
037055’ 
037071’ 
037125’ 
037154’ 
037170 
037171’ 


;LOCAL STORAGE FOR TEST 8 
WORD O 


STMSG: ‘ 
;SELF TEST MESSAGE TABLE 
STTBL: .W SM 


ORD SGOO 
-WORD SMSGO1 
-WORD SMSGO2 
-WORD SMSGO3 
-WORD SMSGO4 
.WORD SMSGOS 
-WORD SMSGO06 
-WORD SMSGO7 
-WORD SMSG10 
-WORD SMSGi1 
-WORD SMSGi2 
.WORD SMSG135 
-WORD SMSG14 
.WORD SMSG1i5 
-WORD SMSG16 
-WORD SMSG17 
-WORD SMSG20 
-WORD SMSG2i 
-WORD SMSG22 
-WORD SMSG23 
-WORD SMSG24 
-WORD SMSG25 
-WORD SMSG26 
-WORD SMSG27 
-WORD SMSG3O 
.WORD SMSG31 
-WORD SMSG32 
-WORD SMSG33 
-WORD SMSG34 
-WORD SMSG35 
-WORD SMSG36 
-WORD SMSG37 
-WORD SMSG40 
-WORD SMSG41 
-WORD SMSG42 
-WORD SMSG43 
-WORD SMSG44 
-WORD SMSG45 
. WORD SG46 
-WORD SMSG47 
-WORD SMSG5O 
-WORD SMSG51i 
-WORD SMSG5S2 
-WORD SMSG53 
-WORD SMSG54 
-WORD SMSG55 
-WORD SMSG56 
-WORD SMSG57 
-WORD SMSG60 


; SELF TEST MESSAGE ADDRESS 





SEQ 172 


HARDWARE TESTS MACRO YO5.02 
SELF TEST 


TEST 8: 
5941 


5942 


5943 


5944 


5945 


5946 


5947 


5948 


5949 


5950 


5951 
5952 


5953 


036722 


037124 


037125 
037130 
037133 
037136 
037141 
037144 
037147 
037152 
037154 
037157 
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;ASCII MESSAGES 


SMSGOO: 


SMSGO1: 


SMSGO2: 


SMSGO3: 


SMSG04: 


SMSGO5: 


SMSGO6 : 


SMSGO7: 


SMSG10: 


SM35G1i1: 


SMSG12: 


-ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/PASSED SELF TEST/<15><12> 


/UNDEF INED/<15><12> 


. UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 


/PHYSICAL ADDRESS ROM TEST/<15><12> 


/TIMER INTERRUPT TEST/<15><12> 


/UNDEF INED/<15><12> 


SEQ 173 


5960 


5961 


5962 


5963 


037162 
037165 
037170 
037171 


037410 
037413 





105 
012 


104 
0690 


SMSG13: 
SMSG14: 
SMSG1i5: 
SMSG16: 
SMSG17: 
SMSG20: 


SMSG21: 


SMSG22: 


SMSG23: 


SMSG24: 
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TEST 8: SELF TEST 


-ASCIZ 
-ASCIZ 
.ASCIZ 
-ASCIZ 
-ASCIZ 
.ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


4/ 
4/ 
4/ 
4/ 


4/ 
/LANCE INTERNAL LOOPBACK TEST/<15><12> 


/LANCE IBUS PARITY ERROR TEST/<15><12> 


/LANCE CRC LOGIC TEST/<15><12> 


/LANCE COLLISION DETECT TEST/<15><i2> 


/LANCE MULTICAST ADDRESS TEST/<15><12> 


SEQ 174 


—- 
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TEST 8: SELF TEST 


-— 


5964 


5965 


5966 


037416 
037417 
037422 
037425 
037430 
037433 
037436 
037441 
037444 
037447 
037452 
037455 


037636 


SMSG25: 


SMSG26: 


SMSG27: 


SMSG41: 


SMSG42: 


SMSG43: 


.ASCIZ /LANCE BROADCAST ADDRESS TEST/<15><12> 


.ASCIZ /LANCE PHYSICAL ADDRESS REJECT TEST/<15><12> 


.ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 





/LANCE EXTERNAL LOOPBACK TEST/<15><12> 


4/4 

/UNDEF INED/<15><12> 
/UNDEF INED/<15><12> 
/UNDEF INED/<15><12> 


/UNDEF INED/<15><12> 





SEQ 175 
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TEST 8: SELF TEST 


027641 105 106 111 


0 
5979 037652 125 116 104 SMSG44: .ASCIZ /UNDEFINED/<15><12> 
5980 037666 125 116 104 SMSG45: .ASCIZ /UNDEFINED/<15><12> 


0 
5981 pr Lk 104 115 101 SMSG46: .ASCIZ /DMA UNIBUS ACCESS TEST/<15><12> 


0 
5982 aera 104 115 101 SMSG47: .ASCIZ /DMA UNIBUS ACCESS TEST/<15><12> 


5983 
5984 037764 125 116 104 SMSGSO: .ASCIZ /UNDEFINED/<15><12> 


5985 040000 125 116 104 SMSG51: .ASCIZ /UNDEFINED/<15><12> 
04 

5986 040014 125 116 104 SMSGS2: .ASCIZ /UNDEFINED/<15><12> 
04 

5987 040030 125 116 104 SMSG53: .ASCIZ /UNDEFINED/<15><12> 

5988 040044 125 116 104 SMSG54: .ASCIZ /UNDEFINED/<15><12> 

5989 040060 125 116 104 SMSGSS: .ASCIZ /UNDEFINED/<15><12> 


5990 040074 125 116 104 SMSGS6: .ASCIZ /UNDEFINED/<15><12> 


qa) eo, 


hs = 
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TEST 8: 


5991 


5992 
5993 


5994 


SELF TEST 


040105 
040110 
040113 
040116 
040121 


SMSG57: 


SMSG60: .ASCIZ /DELUA IBUS LOADING TEST - CLOG/<15><i2> 


.ASCIZ /UNDEFINED/<15><12> 


.EVEN 


SEQ 177 


= 
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TEST 9: PORT COMMAND TEST 


103010 
004737 


104456 
000027 


040570’ 
032734' 


033434! 
004100 
000140 
027736' 


026652’ 


030264 ' 


026652 ' 


SEQ 178 
.SBTTL TEST 9: PORT COMMAND TEST 
pPRREREEEAEEEEREREEAEEREERAEEEREREARESEEEEAERE SEER EERE SEEK EE EE ED DEERE EES 
; THIS TEST VERIFIES THAT NO ERRORS OCCUR WHEN 
: A DELUA PORT COMMAND IS ISSUED. 
: 
: TEST SEQUENCE: 
: 1. ISSUE A DEVICE RESET 
; WAIT FOR DNI 
3 3. WRITE A ONE TO CLEAR DONI 
; 4. ISSUE A NOP PORT COMMAND 
: 5S. WAIT FOR DONI 
$ 6. WRITE ONE TO CLEAR ONI 
; 7. MOVE NOP FUNCTION INTO PCBB 
: 8. ISSUE A GETPCBB PORT COMMAND 
: 9. WAIT FOR ONI 
: 10. WRITE ONE TO CLEAR ONI 
; 11. ISSUE A GETCMD PORT COMMAND 
: 12. WAIT FOR DONI 
: 13. WRITE ONE TO CLEAR DONI 
;RREERREREKEAEAAASREREAEEEEEAEEEREEEREBEEEEEEAEE EA ERAEEA EE EE ESSERE EE EE EEE 
BGNTST 
T9:: 
PNTMAC TO9ID 
MOV #TO9ID ,R4 sGET POINTER TO TEST NAME MESSAGE 
JSR PC ,.PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 25$ ; NO 
MOV @DNI+INTE, @PCSRO ; PRECONDITION INTR EN. 
MOVB @INTE! RSET ,@PCSRO ; RESET DELUA 
JSR PC ,CKDNI ; ONI ? 
BCC 20$ ; YES 
JSR PC .CHKFTL ; FATL BIT SET? 
ERRHRD 022. ,ERROO6,.MSGOOS ; REPORT ERROR 
TRAP CSERHRD 
. WORD E 
-WORD ERROOG 
-WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD Li0037-. 
; 
20$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
; ERROR 
BCC 25$ ; NO 
JSR PC ,CHKFTL ; FATL BIT SET 
ERRHRD 023. ,ERRO06,MSGO03 ; YES, REPORT ERROR 
AP —_— 
2 





rrr ree ES ee 





-_ — 
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TEST 9: PORT COMMAND TEST 


SEQ 179 


040264 023030’ -WORD ERROOG 
040266 021736‘ -WORD MSGO003 
6038 040270 ESCAPE TST ; AND ABORT 
040270 104410 TRAP CSESCAPE 
ain 040272 000322 «WORD 1L10037-. 
6040 040274 012777 004100 137722 25%: MOV #DNI+INTE, @PCSRO ; PRE-CONDITION INTR EN. 
6041 040302 112777 000106 137714 MOVB #INTE!PNOP ,@PCSRO ; ISSUE A NOP PORT COMMAND 
6042 040310 004737 026550’ JSR PC ,CHKONI ; DNI ? 
6043 040314 103010 BCC 30$ ; YES 
6044 040316 004737 026652‘ JSR PC ,CHKFTL ; FATL BIT SET? 
6045 040322 ERRHRD 024. ,ERROO8,MSGOO03 ; NO, REPORT ERROR 
040322 104456 TRAP CSERHRD 
040324 000030 . WORD 4 
040326 023166’ -WORD ERROOS 
040330 021736’ -WORD MSGO003 
6046 040332 ESCAPE TST ; AND ABORT TEST 
040332 104410 TRAP CSESCAPE 
on 040334 000260 -WORD 1L10037-. 
6048 040336 004737 030264' 30$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
6049 ; ERROR 
6050 040342 103010 BCC 40$ ; NO 
6051 040344 004737 026652' JSR PC ,CHKFTL ; FATL BIT SET? 
6052 040350 ERRHRD 025. ,.ERROO6,MSGOOS ; YES, REPORT ERROR 
040350 104456 TRAP CSERHRD 
040352 000031 -WORD 25 
040354 023030’ -WORD ERROOG 
040356 021736' -WORD MSGOO3 
6053 040360 ESCAPE TST ; AND ABORT 
040360 104410 TRAP CSESCAPE 
040362 000232 -WORD 1L10037-. 
6054 ; 
6055 040364 403: 
6056 040364 012705 012440’ MOV @NOPF RS ; POINT TO DEFAULT NOP FUNCTION 
6057 040370 004737 032002‘ JSR PC .LOPCBB ; LOAD FUNCTION INTO PCBB 
6058 040374 9004737 032032’ JSR PC ,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 
6059 040400 012777 004100 137616 MOV @ONI+INTE , @PCSRO ; PRECONDITION INTR EN. 
6060 040406 112777 000101 137610 MOVB #INTE!GETPCB ,@PCSRO ; ISSUE A GETPCBB PORT COMMAND 
6061 040414 004737 026550’ JSR PC ,.CHKONI ; ONI? 
6062 040420 103010 BCC 50$ ; YES 
6063 040422 004737 026652’ JSR PC .CHKFTL ; FATL BIT SET 
6064 040426 ERRHRD 026. ,ERROO9,MSGOO0S ; NO, REPORT ERROR 
040426 104456 TRAP CSERHRD 
040430 000032 -WORD 26 
040432 023245’ -WORD ERROOD 
040434 021736’ .WORD MSGOO3 
6065 040436 ESCAPE TST ; AND ABORT TEST 
040436 104410 TRAP CSESCAPE 
vo 040440 000154 -WORD 1L10037-. 
6067 040442 004737 030264’ 50$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
6068 ; ERROR ? 
6069 040446 103010 BCC 60$ ; NO 
6070 040450 004737 026652’ JSR PC ,CHKFTL ; FATL BIT SET? 
6071 040454 ERRHRD 027. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
040454 104456 TRAP CSERHRD 
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TEST 9: PORT COMMAND TES 


000033 
023030' 
021736’ 


104410 
000126 


012777 
112777 
004737 
103010 
004737 


104456 


000036 
023331’ 
021736’ 


104410 
000064 


104401 


T 


i 
004100 137526 60$: 
000102 137520 


ESCAPE 


JSR 
ERRHRD 


ESCAPE 


JSR 
EXIT 


TST 


@DNI+INTE, @PCSRO 
#INTE!GETCMD ,@PCSRO 
PC ,CHKDNI 


70$ 
PC ,CHKFTL 
030. ,ERRO10,MSGO03 


TST 
PC ,CLRONI 


80$ 
PC ,CHKFTL 
031. ,ERROO6,,MSGOO0S 


TST 


PC ,CLINTR 
TST 


;LGCAL TEST MESSAGE 


026550' 
026652’ 
; 
030264 ' 70$: 
026652’ 
80$: 
030346' 
105 114 
101 040 
117 122 
040 103 
115 115 
116 104 
000 
-EVEN 


ENDTST 


TO9ID: .ASCIZ ‘DELUA PORT COMMAND ° 


AND ABORT TEST 


PRECONDITION INTR EN. 
oo A GETCMD PORT COMMAND 


YES 
FATL BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR ? 


NO 
FATL BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


INSURE DELUA INTR BITS SET 


TRAP 
. WORD 


L10037: 
TRAP 


SEQ 180 


27 
ERROOG 
MSGO03 


CSESCAPE 
L10037-. 


CSERHRD 
30 


ERRO1O 
MSGOO3 


CSESCAPE 
L10037-. 


CSExIT 
L10037-. 


CSsETST 





So 
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TEST 10: INTERRUPT LOGIC TEST 


6132 


040710 
040710 
040712 
040714 
040716 
040720 
040720 


041136’ 
032734' 


027736‘ 


026652‘ 


030264 ' 


026652’ 


.SBTTL TEST 10: INTERRUPT LOGIC TEST 


poh hh hh hh Ob OE 06066444 4444S EEEEEEEEEEEEEEEEEEESEEES E446 60640460066608088 
THIS TEST VERIFIES THAT A DELUA INTERRUPT CAN BE GENERATED. 


TEST SEQUENCE: 
1. SET UP THE INTERRUPT VECTOR 


BGNTST 


PNTMAC 


MOV 
JSR 


2. ISSUE A GET PCBB POR 


T COMMAND 


3. WAIT FOR A ONI INTERRUPT 
4. WRITE ONE TO CLEAR ONI 


T101ID 


#T10ID ,R4 
PC ,PNTID 


REKRKEKREKEEADRESREEESEKEEEEEEEEEEE4EEEO44646464666464646446 6666 666466646466464646646464646866 


T10:: 


;GET POINTER TO TEST NAME MESSAGE 
;sPRINT TEST NUMBER AND NAME 


END OF MACRO EXPANSION OF ‘PNTMAC’ 


ESCAPE 


PC, TINIT 
25 


$ 
@ONI+INTE, @PCSRO 
a 


20% 


PC ,CHKFTL 
032. ,ERROOG , MSGOO0S 


TST 


PC ,CLRONI 
25$ 


PC ,CHKFTL 
033. ,ERROO6 ,MSGOOS 


TST 


a A DEVICE RESET NEEDED? 


PRECONDITION INTR EN. 
YES, RESET DELUA 
ONI ? 


YES 


‘FATL’ BIT SET? 
; NO, REPORT ERROR 


SEQ 181 


TRAP CSERHRD 
-WORD 32 
-WORD ERROOG 
-WORD SGOOS 
; AND ABORT TEST 
TRAP CSESCAPE 
-WORD .L10040-. 
; WRITE ONE TO CLEAR ONI 
; ERROR 
: 
; ‘FATL‘ BIT SET? 
; YES. REPORT ERROR 
TRAP CSERHRD 
. WORD 3 
-WORD ERROOG 
-WORD MSGOOS 
; AND ABORT 
TRAP CSESCAPE 





2. eee nn aaa rTEre™:: --_-- 


LEE LE 
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— 040722 000244 «WORD 110040-. 
; 
rer ;SET UP INTERRUPT VECTOR 
6136 040724 25$: SETVEC INTVEC,@ISRONI,UNAPRI 
040724 013746 000242’ MOV UNAPRI , -(SP) 
040730 012746 034374' MOV @ISRONI, -( SP) 
040734 013746 000240’ rOV INTVEC , -CSP) 
040740 012746 000003 MOV 03 ,-C(SP) 
040744 104437 TRAP Cssvec 
0407 062706 000010 #10, SP 
6137 040752 SETPRI #PRIO4 ; SET CPU PRIORITY = 4 
0407 012700 000200 Vv @PRIO4 ,RO 
eine 040756 104441 TRAP C$SPRI 
a ; ISSUE GET PCBB PORT COMMAND WITH INTERRUPTS ENABLED 
6141 040760 40$: 
6142 040760 005037 016610’ CLR ONIFLG ; INSURE ONI BIT SET FLAG IS CLEAR 
6143 040764 012705 012440’ MOV @NOPF RS ; POINT TO DEFAULT NOP FUNCTION 
6144 040770 004737 032002’ JSR PC ,.LOPCBB ; LOAD FUNCTION INTO PCBB 
6145 040774 004737 032032’ JSR PC ,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 
6146 041000 012777 004100 137216 MOV @DNI!INTE, aPCSRO ; PRECONDITION INTR EN. 
y+ oi 041006 112777 000101 137210 MOVB @INTE!GETPCB, @PCSRO ; ISSUE A GETPCBB PORT COMMAND 
Hes ;WAIT FOR DNI INTERRUPT 
6151 041014 012701 005000 MOV #5000, R1 sINIT WAIT COUNT 
6152 041020 50$: 
6153 041020 005737 016610’ TST ONIFLG ;DID DNI INTERRUPT OCCUR? 
6154 041024 001020 BNE 70$ ;YES, CONTINUE TEST 
6155 041026 005301 DEC Ri sREDUCE DELAY 
6156 041030 001373 BNE 50$ sNOT YET 
6157 041032 FTL 
041032 004737 026652’ JSR PC .CHKFTL ; ‘FATL' BIT SET? 
6158 041036 ERRHRD 034. ,ERROO7 ; YES, REPORT ERROR 
041036 104456 TRAP CSERHRD 
041040 WORD 34 
041042 023076’ -WORD ERROO7 
041044 -WORD O 
6159 041046 CLRVEC INTVEC ; DEALLOCATE VECTOR 
041046 013700 000240' MOV INTVEC .RO 
041052 1044356 TRAP Cscvec 
6160 041054 SETPRI @PRIO7 ; RESTORE CPU PRIORITY TO 7 
041054 012700 000340 MOV @PRIO7 .RO 
041060 104441 TRAP CsSPRI 
6161 041062 ESCAPE TST ; AND ABORT TEST 
041062 104410 TRAP CSESCAPE 
onan 041064 000102 -WORD 1L10040-. 
é 
oes ;WRITE ONE TO CLEAR ONI 
6165 041066 004737 033402’ 708: JSR PC, TIMOFF s TURN OF THE TIMER 
6166 041072 SETPRI @PRIO7 ; RESTORE CPU PRIORITY TO 7 
0410 012700 000340 MOV @PRIO7 RO 
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6167 
6168 
6169 
6170 


6171 


6172 


6173 
6174 
6175 
6176 


6177 
6176 
6179 
6180 


041076 
041100 


104441 
004737 
103010 


004737 


104401 


030264 ' 


026652 ° 


030346 ' 


. JSR 


BCC: 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 
EXIT 


PC ,.CLRONI 
80$ 


' PC, CHKFTL 
035. ,ERROO6,MSGOOS 


TST 


PC ,CLINTR 


TST 


;LOCAL TEST MESSAGE 


T1OID: .ASCIZ ‘DELUA INTERRUPT LOGIC ' 


EVEN 


ENDTST 








SEQ 183 


TRAP C$SPRI 
WRITE ONE TO CLEAR ONI 
ERROR? 


3; ‘FATL’ BIT SET? 


; YES, REPORT ERROR 
TRAP _ 


. WORD 
«WORD ERROOG 
-WORD MSGOO3 

; AND ABORT 
TRAP CSESCAPE 
-WORD 1L10040-. 


; INSURE DELUA INTR BITS CLEAR 


TRAP CsExIT 
-WORD 1L10040-. 


L10040: 
TRAP CsETST 

















| nein’ 
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SEQ 184 


quay eo =» 


6185 _SBTTL TEST 11: READ INTERNAL ROM TEST 
6187 FRASAAASESASSAASELEASASEAAEASEAERESESESESEAEEEAESESESESEEESESESEEAEEEAEEEEES 
6188 ; 
6189 ' THIS TEST READS AND VERIFIES THE INTERNAL ROM. 
6190 : THE DUMP INTERNAL MEMORY FUNCTION IS USED TO READ THE ROM. 
6191 ' A CRC IS GENERATED FROM THE ROM DATA READ. 
6192 : A CRC VALUE OF ZERO SHOULD BE GENERATED FROM THE ROM 
6193 ; DATA READ WHICH INCLUDES THE STORED ROM CRC VALUE. 
; 
6195 ; TEST SEQUENCE: 
6196 ; 1. CLEAR RBUF 
6197 ; 2. READ 1K OF ROM INTO RBUF 
6198 ; 3. CALCULATE CRC ON RBUF 
6199 4. REPEAT STEPS 1-3 FOR EACH 1K BLOCK OF ROM (8 TIMES) 
6200 ; 5S. VERIFY CRC GENERATED = 0 
6202 WTTTTTITTTTTTTTTTTITIT TTT TIT TTT Te 
6203 
6204 041170 BGNTST 
041170 Til:: 
6205 
6206 041170 PNTMAC T11ID 
041170 012704 041664: MOV #T11ID,R4 ;GET POINTER TO TEST NAME MESSAGE 
041174 004737 032734' JSR PC ,PNTID sPRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC: 
6207 041200 004737 033434’ JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
6208 041204 103034 BCC 30$ ; NO 
6209 041206 012777 004100 137010 MOV SDNI PS INTE, @PCSRO ; PRECONDITION INTR EN. 
6210 041214 112777 000140 137002 MOVE § #INTE! RSET, @PCSRO ; YES, RESET DELUA 
6211 041222 004737 027736’ JSR PC ,CKDNI ; DNI ? 
6212 041226 103010 Bcc 203 ; YES 
6213 041230 FTL 
041230 004737 026652° JSR PC .CHKFTL ; 'FATL' BIT SET? 
041234 ERRHRD 036. ,ERROG6,MSGOO3 ; NO, REPORT ERROR 
041234 104456 TRAP § CSERHRD 
041236 000044 .WORD 36 
041240 023030° “WORD ERROOG 
041242 021736’ “WORD MSGOO3 
041244 ESCAPE TST ; AND ABORT TEST 
041244 104410 TRAP  CSESCAPE 
poe 041246 000450 _WORD L10041-. 
6217 041250 004737 030264° 20$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
6218 ; ERROR ? 
6219 041254 103010 BCC 30$ ; NO 
6220 041256 FTL 
041256 004737 026652’ JSR PC, CHKFTL ; ‘'FATL' BIT SET? 
041262 ERRHRD 037. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
041262 104456 TRAP _ CSERHRD 
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041264 000045 
041266 0235030‘ 
041270 021736' 


041272 
041272 
041274 


041276 
041302 
041310 


041406 
041412 


041416 
041424 
041430 
041434 
041440 
041444 


104410 
000422 


004737 
012777 
112777 
004737 
103010 


004737 


103010 


004737 


104456 
000051 
023030' 
021736' 


104410 
000326 


012705 
004737 
012705 
012700 
004737 


012737 
012702 
012700 
012720 
012710 
012701 


004737 


032032’ 
004100 
000101 
026550‘ 


026652 ' 


030264' 


026652’ 


012664’ 
032002’ 
015622’ 
000005 

032260' 


002000 
015634’ 
016574' 
177777 
177777 
000017 


030236’ 


016560’ 





40$: 


ESCAPE TST 

JSR PC ,.LDPCSR 

MOV @DNI! INTE, @PCSRO 
MOVB #INTE!GETPCB ,@PCSRO 
JSR PC ,CHKONI 

BCC 40$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 040. ,ERROO9,MSGO0S 


ESCAPE TST 

JSR PC ,,CLRONI 
BCC 50$ 

FTL 

JSR PC ,CHKFTL 
ERRHRD 041. ,ERROO6,MSGOOS 
ESCAPE TST 

MOV ¢DMPMEM,RS 
JSR PC ,LOPCBB 
MOV #UDB10A,R5 
MOV #5,R0 

JSR PC ,LDUDBB 
MOV #2000, BYTCNT 
MOV #MEMLOA , Re 
MOV #XCRC,RO 
MOV #-1,(RO)+ 
MOV #-1, (RO) 

MOV #15.,R1 

JSR PC, ,CLRCV 


— ene 
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AND ABORT TEST 


ADDRESS OF PCBB -> PCSR2!3 
PRECONDITION INTR EN. 
A GET_PCBB PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR DONI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


DEFAULT DUMP INTERNAL MEMORY 


LOAD FUNCTION -> PCBB 
DFFAULT UDBB 

FOUR WORDS 

LOAD INTO UDBB 





SEQ 185 


37 
ERROOG6 
MSGO03 


CSESCAPE 
L10041-. 


CSERHRD 
40 


ERROO9 
MSGO03 


CSESCAPE 
L1i0041-. 


CSESCAPE 
L10041-. 


1K BYTES FOR SUBROUTINE ‘ROMCRC’ 
R2 POINTS TO ROM ADDRESS TABLE 


POINT TO CRC STORAGE 
SET INITIAL 

CRC 
PERFORM 15 ROM DUMPS 
AND CRC CALCULATIONS 


CLEAR RBUF 





—_— -« 
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041454 
041460 
041466 
041474 
041500 
041502 
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012237 
012777 
112777 
004737 
103010 


004737 


012701 
022021 


READ INTERNAL ROM TEST 


000316‘ 


026652’ 


030264 ' 


026652 ' 


032462' 
000001 


001774 016560’ 


016574’ 


016574 ' 
010434' 


136536 
136530 


70$: 


; 
; VERIFY 
85$: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


(R2)+,UDBB +6 

#DNI! INTE, @PCSRO 
#INTE!GETCMD ,@PCSRO 
PC ,CHKONI 

70$ 


PC ,CHKFTL 
042. ,ERRO10,MSGO03 


TST 


PC ,.CLRONI 
80$ 


PC ,CHKFTL 
043. ,ERROO6,MSGOOS 


TST 


PC ,ROMCRC 

Ri 

Ri, #1 

60$ 

Ri 

85$ 
#1774,BYTCNT 
60$ 


#XCRC,RO 


#RBUF +1774 ,R1 
CRO)+,CR1)+ 





SEQ 186 


LOAD ROM ADDRESS -> UDBB+6 
PRECONDITION INTR EN. 
ISSUE GET COMMAND PORT COMMAND 


ONI ? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
RAP CSERHRD 
-WORD 42 
-WORD ERRO1O 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10041-. 

WRITE ONE TO CLEAR DNI 

ERROR ? 

NO 

‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 43 
-WORD ERROOG 
-WORD MSGOO3 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10041- 


CALCULATE CRC ON 1K RBUF 
REDUCE 1K BLOCK COUNT 
gy BLOCK LAST ONE? 


ALL DONE? 
YES 


NO, BUT,DON’T INCLUDE CRC 
IN LAST 1K CRC CALCULATION 


—— 
BASE ADDRESS OF CALCULATED CRC 
SAVE 


CRC 
RESET POINTER 


POINT TO ROM CRC 
1ST 2 BYTES CHECK? 





— <— 
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6295 041626 


6297 
6298 
6299 


6300 


6310 
6311 
6312 


041716 
041716 
041716 
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001002 
021011 
001410 


004737 026652’ 


004737 030346' 


104432 
000034 


104401 


BNE 90$ 
CMP CRO), CR1) 
BEQ 95$ 

90$: 
FTL 
JSR PC ,CHKFTL 
ERRHRD 044. ,ERRO24 
ESCAPE TST 

95%: 


JSR PC ,CLINTR 
EXIT TST 


;LOCAL TEST MESSAGE 


T11ID: .ASCIZ ‘DELUA READ INTERNAL ROM ‘ 


-EVEN 
ENDOTST 





NO, GO REPORT ERROR 
2ND 2 BYTES COMPARE? 
YES, GO EXIT TEST 


‘FATL’ BIT SET? 


NO, ROM CRC ERROR, wat ERROR 





SEQ 187 


AP CSERHRD 
-WORD 44 
-WORD ERRO24 
-WORD 0 
; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10041-. 
; INSURE DEUNA INTR BITS CLEAR 
TRAP CSExIT 
-WORD L10041-. 
L10041: 
TRAP CSETST 





-- 
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6354 


041720 
041720 


041720 


041720 
041724 


041730 
041734 
041736 
041744 
041752 
041756 
041760 


041760 


041764 
041764 
041766 
041770 
041772 
041774 
041774 
041776 





104456 
000055 
023030' 
021736’ 


104410 
001160 


043114' 
032734' 


033434’ 
004100 


000140 
027736‘ 


026652’ 


EEO 
: 
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SEQ 188 
SBTTL TEST 12: READ/WRITE INTERNAL MEMORY TEST 
sSaKRARAARALEEEREAESEALAERAREALASEAEEESAEAEEEEASLALEEESESEAEEALARESEEELEEEEE 
; 
THIS TEST READS AND WRITES THE INTERNAL RAM MEMORY. 
; THE DUMP/LOAD INTERNAL MEMORY FUNCTIONS ARE USED TO 
, READ/WRITE THE ENTIRE INTERNAL RAM ABOVE THAT USED 
; FOR THE LOADED PROCESS. 
: LOWEST ADDRESS: 08400(16) 
HIGHEST ADDRESS: 1F400(16) 
; 
TEST SEQUENCE: 
1. WRITE MODE REGISTER = INTERNAL LOOPBACK MODE 
' TO REMOVE MEMORY FROM THE WIRE 
' 2. LOAD TBUF WITH DATA = ADDRESS 
; 3. LOAD 1K OF INTERNAL MEMORY WITH TBUF 
; 4. REPEAT STEPS 1 AND 2 FOR 
; EACH 1K BLOCK OF MEMORY ( TIMES) 
: 5. RESETUP TBUF FOR DATA COMPARE 
6. CLEAR RBUF 
; 7. DUMP INTERNAL MEMORY -> RBUF 
' 8. COMPARE RBUF WITH TBUF 
; 9. REPEAT STEPS 4,5,6 AND 7 FOR EACH 1K BLOCK 
: 10. REPEAT STEPS 1 THRU 8 WITH COMPLIMENT DATA 
keSgREREEAKESEEEREEESEOEESESEKESEO4EEEEEEEEEEEEEESEEEEEEEESEEKESEEEEAEEEESE SESE 
BGNTST 
Ti2:: 
PNTMAC T12ID 
MOV 8T12ID.R4 :GET POINTER TO TEST NAME MESSAGE 
JSR PC ,PNTIO SPRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
Bcc 30$ ; NO 
MOV 2ONI SINTE, BPCSRO | PRECONDITION INTR EN. 
MOVB INTE! RSET, @PCSRO ; YES, RESET DELUA 
JSR PC ,CKDNI ; ONI ? 
BCC 20$ ; YES 
FTL 
JSR PC, CHKFTL ; 'FATL! BIT SET? 
ERRHRD 045. ,.ERROO6,.MSGO03 ; NO, REPORT ERROR 
TRAP  CSERHRD 
WORD 45 
"WORD  ERROOG 
"WORD  MSGOO3 
ESCAPE TST ; AND ABORT TEST 
: TRAP §_ CSESCAPE 
‘WORD 10042-. 





-- 
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MACRO YOS.02 Friday 12-Jul-85 09:33 Page 102-1 


ee eee 


SEQ 189 





6355 
6356 042000 004737 030264’ 20$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
357 ; ERROR ? 
6358 04 103010 BCC 30$ ; NO 
6359 042006 FTL 
042006 004737 026652! JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
6360 042012 ERRHRD 046. ,ERROO6,MSGOO3 ; YES, REPORT ERROR 
042012 104456 TRAP § CSERHRD 
042014 000056 WORD 46 
042016 023030’ “WORD  ERROOS 
042020 021736! "WORD MSGOO3 
6361 042022 ESCAPE TST ; AND ABORT TEST 
042022 104410 TRAP  CSESCAPE 
wet 042024 001132 .WORD L10042-. 
6363 042026 004737 032032' 30$: JSR PC ,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 
6364 042032 012777 004100 136164 MOV #DNI ! INTE, @PCSRO ; PRECONDITION INTR EN. 
6365 042040 112777 000101 136156 MOVB § #INTE!GETPCB, @PCSRO ; ISSUE GET_PCBB PORT COMMAND 
6366 042046 004737 026550’ JSR PC ,CHKDNI 
6367 042052 103010 BCC 40$ ; YES 
6368 042054 FTL 
042054 004737 026652’ JSR PC, CHKFTL ; 'FATL’ BIT SET? 
6369 042060 ERRHRD 047. ,ERROO9,MSGOO3 ; NO, REPORT. ERROR 
042060 104456 TRAP § CSERHRD 
042062 000057 WORD 47 
042064 023245: “WORD ERROOD 
2066 021736’ “WORD MSGOO3 - 
6370 042070 ESCAPE TST ; AND ABORT TEST 
042070 104410 TRAP  CSESCAPE 
sail 042072 001064 _WORD 110042-. 
6372 042074 004737 030264' 40s: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
6373 ; ERROR ? 
6374 042100 103010 BCC 45$ ; NO 
6375 042102 FTL 
042102 004737 026652' JSR PC, CHKFTL ; ‘FATL' BIT SET? 
6376 042106 ERRHRD 050. ,ERROO6,MSG003 ; YES, REPORT ERROR 
042106 104456 TRAP §_ CSERHRD 
042110 000062 WORD 
042112 023030° "WORD ERROOG 
142114 021736! “WORD MSGOO3 
6377 042116 ESCAPE TST ; AND ABORT TEST 
042116 104410 TRAP  CSESCAPE 
me 042120 001036 .WORD 110042-. 
6379 ; ISSUE A PORT HALT TO INHIBIT NI ACTIVITY 
6381 042122 4S$: 
6383 042122 012777 004100 136074 MOV #DNI! INTE, @PCSRO ; PRECONDITION INTR EN. 
6384 042130 112777 000116 136066 MOVB §§ #INTE!HALT,@PCSRO ; PORT HALT 





6385 042136 
6386 042142 


6387 


6388 


042144 


004737 
103010 


004737 


025522 ' 
021736' 


104410 
000774 


004737 
103010 


004737 


104456 


000064 
023030’ 
021736‘ 


104410 
000746 


005037 
012703 
012701 


010305 
004737 


012705 
004737 
012777 
103010 


004737 


104456 
000065 


023331' 


026550’ 


026652" 


030264 ' 


026652 ' 


016606 ' 
015712‘ 
000065 


031446' 
012674' 
033256 ' 
004100 


000102 
026550’ 


026652 ' 


135752 
135744 


47s: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 
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PC ,CHKDNI 
47$ 


PC ,CHKFTL 
051. ,ERRO38,MSGO03 


TST 


PC ,CLRONI 
50$ 


PC ,CHKFTL 
052. ,ERROO6 ,MSGOO03 


TST 


SEQ 190 
ONI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 51 
-WORD ERRO3S 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10042-. 
WRITE ONE TO CLEAR DNI 
ERROR 7 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP CSERHRD 
-WORD S52 
-WORD ERROOG 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10042-. 


iWRITE RAM MEMORY WITH DATA = ADDRESS BY 1K BLOCKS 


65$: 


CLR EAFLAG 
MOV @MEM13A,R3 
MOV #53. ,R1 
SWRITE TBUF WITH DATA = ADDRESS 
60$: MOV R3,R5 
JSR PC.LDBUFC 
LOAD INTERNAL RAM MEMORY 
MOV @LDMEM RS 
JSR PC, SRWRAM 
MOV @ONI INTE, SPCSRO 
MOVB § @INTE! GETCMD, @PCSRO 
JSR PC ,CHKDNI 
BCC 70$ 
FTL 
JSR PC, CHKFTL 


ERRHRD 053. ,ERRO10,MSGO0S 


CLEAR EXT ADDR BITS FLAG 
R3 POINTS TO LINK MEM ADDRESS TABLE 
DO LOOP 


RS POINTS TO ADDRESS 
LOAD TBUF WITH ADDRESS DATA PATTERN 


DEFAULT LOAD INTERNAL MEMORY 
LOAD PCBB AND UDBB 


PRECONDITION INTR EN. 
ISSUE GET COMMAND PORT COMMAND 


ONI ? 

YES .. 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
.WORD 53 
.WORD ERRO1LO 





OO ee eOeNeeeaee 


SEQ 191 











-_— 
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042300 021736: .WORD MSGO03 
6418 042302 ESCAPE TST ; AND ABORT TEST 
042302 104410 TRAP —- CSESCAPE 
garg 12304 000652 WORD L10042-. 
6420 042306 004737 030264’ 70$: JSR —«- PC, CLRONI ; WRITE ONE TO CLEAR ONI 
6421 ; ERROR ? 
6422 042312 103010 Bcc 3Os«80$ ; NO 
6423 042314 FTL 
042314 004737 026652' JSR PC, CHKFTL : ‘FATL’ BIT SET? 
6424 042320 ERRHRD 054. ,ERROO6,MSGOO3 ; YES, REPORT ERROR 
042320 104456 TRAP —CSERHROD 
042322 000066 WORD 54 
042324 023030’ ‘WORD  ERROOG 
042326 021736: ‘WORD  MSGO03 
6425 042330 ESCAPE TST ; AND ABORT TEST 
042330 104410 TRAP —_ CSESCAPE 
042332 000624 WORD L10042-. 
6426 042334 80: 
6427 042334 005723 TST CR3« ; BUMP TABLE POINTER 
6428 042336 005301 DECC ; DONE 16 WRITES ? 
6429 042340 001382 BNE 608 ; NO 
6431 ;READ INTERNAL RAM MEMORY BY 1K BLOCKS AND COMPARE DATA 
6433 042342 005037 016606: CLR —sEAFLAG ; CLEAR EXT ADDR BITS FLAG 
6434 042346 012703 015712’ MOV © @MEM3A,R3 ; R3 POINTS TO LINK MEM ADDRESS TABLE 
6435 042852 012701 000065 MOV =—s«@53., RA ; DO LOOP 
; 
6437 ;SETUP TBUF FOR DATA COMPARE 
6438 042356 010305 100$: MOV ; RS POINTS TO ADDRESS 
6439 042360 004737 031446" JSR «PC, LDBUFC ; LOAD TBUF WITH ADDRESS DATA PATTERN 
644i ;CLEAR RBUF ; 
6443 042364 004737 030236" JSR —- PC, CLRCV ; CLEAR RECEIVE BUFFER 
6445 ;DUMP INTERNAL MEMORY INTO RBUF 
6446 042370 012705 012664’ MOVs @0MPMEM, RS ; DEFAULT DUMP INTERNAL MEMORY 
6447 042378 004737 033256" JSR —s- PC, SRWRAM ; LOAD PCBB AND UDBB 
6 
6449 042400 012777 004100 135616 115%: MOV § @ONI!INTE,@PCSRO ; PRECONDITION INTR EN. 
6450 042406 112777 000102 135610 MOVB  @INTE!GETCMD,@PCSRO —«;_: ISSUE GET COMMAND PORT COMMAND 
6451 042414 004737 026550° JSR —- PC, CHKONI ; DNI ? 
6452 042420 103010 Bcc} 3—s«1208 ; YES 
6453 042422 FTL 
042422 004737 026652’ JSR PC, CHKFTL ; 'FATL' BIT SET? 
6454 042426 ERRHRD 055. ,ERRO10,MSG003 ; NO, REPORT ERROR 
042426 104456 TRAP —C$ERHRD 
042430 000067 WORD 55 
042432 023331’ "WORD  ERROIO 
021736' "WORD  MSGOO3 


042434 
6455 042436 


= } =.}» CTC # OOOM° << a 


ESCAPE TST 


AND ABORT TEST 
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6456 
6457 
6458 
6459 
6460 


6461 


649 
6492 


ee 


042436 
042440 


042442 


042544 
042550 
042554 


042560 
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104410 
000516 


004737 
103010 


004737 


012705 
004737 
103010 


004737 


005037 
012703 
012701 


010305 


030268 


026652 ° 


000001 
000500 


002000 
030772' 


026652 ' 


016606 ' 
015712’ 


000065 


r 
120$: 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


PC ,CLRONI 
130$ 


PC ,CHKFTL 
056. ,ERROO6, MSGO03 


TST 


:COMPARE RBUF WITH TBUF 


1308: 


1358: 
136$: 


; 
140$: 


ESCAPE 


#1024. RS 
PC ,CMPMEM 
140$ 


PC ,CHKFTL 
057. ,ERRO41,MSG007 


TST 


CR3)+ 
Ri 
100$ 





TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 
— ? 


‘FATL' BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


HS THIS THE LAST 1K BLOCK ? 
YES, ONLY COMPARE 500 WORDS 


COMPARE 1024. WORDS OF DATA 
a COMPARE ERROR 7? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


; AND ABORT TEST 


; BUMP UP TABLE POINTER 


DONE 103 READS ? 


; 
;REPEAT TEST WITH COMPLIMENTED DATA PATTERN 


;WRITE INTERNAL MEMORY WITH DATA = COMPLIMENT OF ADDRESS BY ik BLOCKS 


CLR 
MOV 
MOV 


EAFLAG 
@MEM13A,R3 
#53. ,R1 


WRITE RBUF ITH DATA = ADDRESS 


160$: 


MOV 


; CLEAR EXT ADDR BITS rLAG 


; RS POINTS TO ADDRESS 


SEQ 192 


CSESCAPE 
L10042-. 


CSERHRD 
56 


ERROO6 
MSGO03 


CSESCAPE 
L10042-. 


CSESCAPE 
Li 


; R3 POINTS TO LINK MEM ADDRESS TABLE 
LOOP 
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042562 


004737 


012705 
004737 


012777 


005937 
012703 
012701 


010305 
004737 


012704 
012700 
005024 
077002 


031446’ 
012674’ 
033256’ 


004100 
000102 
026550 ' 


026652‘ 


030264 ' 


026652 ' 


016606 ' 
015712' 
000065 


031446' 


006440’ 
002000 





135420 
135412 


a i LL LLL EE 


SEQ 193 


LOAD TBUF WITH COMPLIMENTED DATA 


DEFAULT LOAD INTERNAL MEMORY 
LOAD PCBB AND UDBB 


PRECONDITION INTR EN. 


ISSUE GET COMMAND PORT COMMAND 


DNI ? 
YES 


‘FATL’ BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR DONI 
— ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


DONE 16 WRITES ? 
NO 


CLEAR EXT ADDR BITS FL 


JSR PC ,LDBUFC 
;LOAD INTERNAL RAM MEMORY 
MOV @LOMEM,R5 
JSR PC, SRWRAM 
165$: MOV @DNI! INTE, @PCSRO 
MOVB  @INTE!GETCMD, @PCSRO 
JSR PC, CHKDNI 
BCC 170$ 
FTL 
JSR PC, CHKFTL 
ERRHRD 060. ,ERRO10,MSG003 
ESCAPE TST 
Q 
170$: JSR PC ,CLRDNI 
BCC 180$ 
FTL 
JSR PC, CHKFTL 
ERRHRD 061. ,ERRO06,MSGOO3 
ESCAPE TST 
180$: 
DEC Ri 
160$ 
3 
READ INT RAM MEMORY BY 1K BLOCKS AND COMPARE DATA 
CLR EAFLAG 
MOV OMEM13A,R3 


MOV #53. Ri 
“SETUP TBUF FOR DATA COMPARE 
R3,R5 


200$ : MOV ° 
JSR PC ,.LDOBUFC 
3 
;CLEAR RBUF 
MOV @RBUF ,R4 
MOV #1024. ,RO 
210$: CLR CR4)+ 
S0B RO,210$ 


CSERHRD 
60 


ERRO10 
MSGO03 


CSESCAPE 
L10042-. 


CSERHRD 
61 


MSGO03 


CSESCAPE 
L10042-. 


AG 
R3 POINTS TO LINK MEM ADDRESS TABLE 


DO LOOP 


RS POINTS TO ADDRESS 


LOAD TBUF WITH COMPLIMENTED DATA 


CLEAR RBUF 





—  — 
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6562 043056 
043056 
6563 043062 
043062 
043064 
043066 
043070 


012705 
004737 


012777 


012664 ' 
033256 ' 


004100 
000102 
026550° 


026652‘ 


030264' 


026652 ' 


000001 
000500 


002000 
030772' 


026652' 


; 
;DUMP INTERNAL RAM MEMORY INTO RBUF 
MOV @DOMPMEM,RS 


i 
135256 215%: 
135250 


2203: 


JSR PC, SRWRAM 

MOV @ONI! INTE, BPCSRO 
MOVB  @INTE! GETCMD,, @PCSRO 
JSR PC, CHKONI 

Bcc 220$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 062. ,ERRO10,MSGO03 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 2308 

FTL 

JSR PC, CHKFTL 

ERRHRD 063. ,ERROO6,MSGOO3 
ESCAPE TST 


; 
;COMPARE RBUF WITH TBUF 


é 
2305: 


3 
2353: 
236$: 


CMP 


JSR 


#1,R1 
235$ 

#500 ,RS 
236$ 
#1024. ,RS 


PC .CMPMEM 
240% 


PC ,CHKFTL 


ERRHRD 064. ,ERRO41,MSGO07 





; DEFAULT DUMP INTERNAL MEMORY 


; LOAD PCBB AND UDEB 


; PRECONDITION INTR EN. 

; ISSUE GET COMMAND PORT COMMAND 
; DNI ? 

: 


YES 


; ‘FATL' BIT SET? 
; NO, REPORT ERROR 


; AND ABORT TEST 
; 
$ 
; NO 

; ‘FATL’ BIT SET? 


; YES, REPORT ERROR 


; AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR 7? 


; - THIS THE LAST 1K BLOCK ? 
; 
; YES, ONLY COMPARE 500 WORDS 


; COMPARE 1024. WORDS OF DATA 


; DATA COMPARE ERROR ? 


; ‘FATL’ BIT SET? 


; YES, REPORT ERROR 


SEQ 194 


CSERHRD 
62 


ERRO10 
MSGO03 


CSESCAPE 
Li 
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6564 043072 ESCAPE TST ; AND ABORT TEST 
045072 


104410 TRAP CSESCAPE 
043074 000062 «WORD 110042-. 
6565 ; 
6566 043076 2403: 
6567 043076 005723 TST CR3)+ ; BUMP UP TABLE POINTER 
6568 043100 005301 DEC Ri DONE 103 READS ? 
one 043102 001301 BNE 200$ 
pete 043104 004737 030346’ JSR PC ,CLINTR ; INSURE DELUA INTR BITS CLEARED 
6573 043110 EXIT TST 
043110 104432 TRAP CsEXxIT 
ons 043112 000044 -WORD L10042-. 
: 
pr iy ;LOCAL TEST MESSAGE 


6 
6577 043114 104 105 114 T12ID:.ASCIZ ‘DELUA READ/WRITE INTERNAL MEMORY ' 
043117 125 101 040 : 


152 122 131 040 
043155 000 
6578 EVEN 
6579 
6580 043156 ENDTST 
043156 L10042: 
043156 104401 TRAP CsETST 

















-~ 
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SEQ 196 


6582 SBTTL TEST 13: INTERNAL LOOPBACK TEST 
6584 FPSERASHASSESEACEALEASASASSSESASASESSASESSEESESAREAEAEASHSEEESEEAEEEEAEEEEES 
6585 
6586 ' THIS TEST VERIFIES THAT AN INTERNAL LOOPBACK OPERATION 
6587 ; CAN BE PERFORMED SUCCESSFULLY. 
3 
6589 TEST SEQUENCE: 
6590 ; 1. WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM MODE 
6591 ' 2. WRITE RING FORMAT 
6592 3. WRITE PHYSICAL ADDRESS 
6593 : 4. SET UP RINGS AND BUFFERS 
6594 5. ISSUE START 
6595 : 6. CHECK FOR ERRORS 
6596 7. ISSUE STOP 
6597 3 
6598 FRSSAEALAAEREAESAAESESELARESAAAEEABEBEAEEEAKEEAEEAEAASEASESESE SA AASASEELES 
6599 
6600 043160 BGNTST 
043160 Ti3:: 
6601 
6602 043160 PNTMAC T13ID 
043160 012704 044540: MOV @T13ID.R4 GET POINTER TO TEST NAME MESSAGE 
043164 004737 032734’ JSR PC .PNTID SPRINT TEST NUMBER AND NAME 
END OF MACRO EXPANSION OF Si: 
6603 043170 004737 033434' JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
6604 043174 103034 Bcc 30$ ; NO 
6605 043176 012777 004100 135020 MOV @DNI! INTE, @PCSRO PRECONDITION INTR EN. 
6606 043204 112777 000140 135012 MOVB = #INTE! RSET, @PCSRO ; YES, RESET DELUA 
6607 043212 004737 027736' JSR PC, CKDNI ; DNI ? 
6608 043216 103010 Bcc 20$ ; YES 
6609 043220 FTL 
043220 004737 026652' JSR PC .CHKFTL ; 'FATL’ BIT SET? 
6610 043224 ERRHRD 065. ,ERROO6.MSGO03 ; NO, REPORT ERROR 
043224 104456 TRAP  CSERHRD 
043226 000101 WORD 65 
043230 023030' "WORD ERROOG 
043232 021736' "WORD  MSGO03 
6611 043234 ESCAPE TST ; AND ABORT TEST 
043234 104410 TRAP _ CSESCAPE 
cial 043236 001334 ‘WORD 10043-. 
6613 043240 004737 030264' 20%: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
6614 ; ERROR ? 
6615 043244 103010 Bcc 308 ; NO 
6616 043246 FTL 
043246 004737 026652' JSR PC .CHKFTL ; ‘FATL' BIT SET? 
6617 043252 ERRHRD 066. .ERROO6,MSG003 ; YES, REPORT ERROR 
043252 104456 TRAP « C$ERHRD 
043254 000102 ‘WORD 66 


6648 


—cecttsale, eeteiais cit LLL LLL LE LL LLL LLL, eeeeeeeeereeeeeeee————e—e—h— 


023030’ 
021736‘ 


104410 
001306 


004737 
004737 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000103 
023245 ' 
021736' 


104410 
001230 


004737 
103010 


004737 


104456 
000106 
023030’ 
921736' 


104410 
001202 


012705 
004737 
012777 
112777 
004737 
103010 


004737 


104456 


030212 
031732‘ 
032032’ 
004100 
000101 
026550' 


026652 ' 


030264' 


026652 ' 


012600' 
032002 ' 
004109 
000102 
026550’ 


026652’ 


134714 
134706 


; 
30$: 


ESCAPE 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


. ESCAPE 
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TST 


PC ,.CLRBUF 

PC,LDDFLT 

PC,LDPCSR 

GONIS INTE, @PCSRO 
#INTE!GETPCB ,aPCSRO 
PC ,CHKDNI 

40$ 

PC ,CHKFTL 


067. ,ERROO9, MSGO03 


TST 


PC ,CLRONI 
50$ 


PC ,CHKFTL 
070. ,ERROO6, MSGO0S 


TST 


<« = ee @+ @¢ Ge Ge 


TRAP 
. WORD 


AND ABORT TEST 


CLEAR XMIT,RECV BUFFERS 


50 8esesers' 


SEQ 197 


ERROOG 
MSGOO3 


CSESCAPE 
L10043-. 


LOAD DEFAULT PHY.ADDRESS TABLES 


ADDRESS OF PCBB -> PCSR2!3 
PRECONDITION INTR EN. 
ISSUE GET_PCBB PORT COMMAND 


ONI? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE 10 CLEAR DNI 
ERROR ? 


NO 

‘FATL’' BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


“WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 


JSR 


@WTMODE ,.RS 
PC .LOPCBB 
#DNI! INTE, @PCSRO 


#INTE!GETCMD ,@PCSRO 


PC ,CHKDNI 
60% 


PC ,CHKFTL 


ERRHRD 071. ,ERRO10,MSGO03 


DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 
PRECONDITION INTR EN. 

ISSUE GET_CMD PORT COMMAND 
DNI ? 

YES 


‘FATL' BIT SET? 


; NO, REPORT ERROR 


TRAP 


CSERHRD 
67 
ERROO9 


CSESCAPE 
L10043-. 


CSERHRD 
70 


CSESCAPE 
L10043-. 


CSERHRD 





os 
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000107 
023331' 
021736’ 


104410 
001130 


004737 
103010 


004737 


104456 
000110 
023030’ 
021736' 


104410 
001102 


012705 
004737 
012705 
012700 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000111 
023331' 
021736‘ 


104410 
001014 


004737 
103010 


004737 


104456 
000112 





030264’ 


026652‘ 


012540' 
032002’ 
012704’ 
000006 
032260' 
004100 
000102 
026550’ 


026652' 


030264 ' 


026652’ 


134500 
134472 


: 
60$: 





ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 
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TST 


PC ,CLRONI 
70$ 


PC ,CHKFTL 
072. ,ERROO6, MSGO03 


TST 


;WRITE RING FORMAT 


70$: 


80$: 


JSR 
ERRHRD 


@WTRNGS.RS 


PC ,LOUDBB 

@ONI! INTE, @PCSRO 
#INTE!GETCMD ,aPCSRO 
ee 


PC ,CHKFTL 


073. ,ERRO1O,MSGO03 


TST 
PC ,CLRONI 
90$ 


PC ,CHKFTL 
074. ,ERROO6, MSGO0S 





. WORD 
«WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR ONI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
RAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 





SEQ 198 


71 
ERRO1O 
MSGO03 


CSESCAPE 
L10043-. 


CSESCAPE 
L10043-. 


DEFAULT WRITE RING FORMAT FUNCTION 


LOAD FUNCTION -> PCBB 
DEFAULT RING FORMAT 

FORMAT = SIX WORDS 

LOAD RING FORMAT -> UDBB 
PRECONDITION INTR EN. 
ISSUE GET_CMD PORT COMMAND 


DNI ? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
_WORD 
“WORD 
“WORD 

AND ABORT TEST 
TRAP 
_WORD 

WRITE ONE TO CLEAR DNI 

ERROR ? 

NO 

‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
_WORD 


CSERHRD 
73 


ERRO10 
MSGO03 


CSESCAPE 
L10043-. 


CSERHRD 
74 
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043576 
043600 


023030° 
021736‘ 


104410 
000766 


103010 


004737 


104456 
000114 
023030’ 
021726’ 


104410 
000656 


012705 
004737 
012705 
004737 


005037 
012737 


000272' 


000102 
026550’ 


026652 ' 


030264’ 


026652’ 


014410’ 
032164’ 
012750' 
032070’ 


016562’ 


000006 016560’ 


134370 
134362 


; 
1008: 


SET UP 


110$: 


SET UP 


ESCAPE 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


TST 


;WRITE PHYSICAL ADDRESS 
90$: 


#DFAULT,RS 

PC ,LDPHYA 
@WTPHYA,RS 

PC ,LDPCBB 

#DNI! INTE, @PCSRO 
#INTE!GETCMD ,@PCSRO 
PC ,CHKONI 

100$ 

PC ,,CHKFTL 


075. ,ERRO10,MSGOO3 


TST 


PC .CLRONI 
110$ 


PC ,CHKFTL 
076. ,ERROO6, MSGO03 


TST 


RINGS FOR ONE BUFFER LOOPBACK 


MOV 
JSR 
MOV 
JSR 


#TORBiA,RS 
PC ,.LOTORB 
#RORB1IA,RS 
PC ,LDRORB 


BUFFERS AND START 


CLR 
MOV 


DOCRC 
#6 ,BYTCNT 


TRAP 
. WORD 


AND ABORT TEST 


GET DEFAULT PHYSICAL ADDRESS 


PLACE IT IN DATA TABLE 


SEQ 199 


ERROOG 
MSGO03 


CSESCAPE 
L10043-. 


DEFAULT WRITE PHYSICAL ADDR FUNC 


LOAD FUNCTION -> PCBB 
PRECONDITION INTR EN. 
a GET_CMD PORT COMMAND 


YES 


‘FATL’' BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR DONI 
ial ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


CS$ERHRD 
75 


ERRO1O 
MSGOO3 


CSESCAPE 
L10043-. 


CSERHRD 
76 


CSESCAPE 
L10043-. 


DEFAULT ONE BUFFER TRANSMIT RING 


LOAD TORB 


DEFAULT ONE BUFFER RECEIVE RING 


LOAD RORS 


NO APPEND CRC 
DATA BYTE COUNT 
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004737 
012777 
112777 
004737 
103010 


6713 043750 
6714 043754 
6715 043762 
6716 043770 
6717 043774 
6718 043776 


004737 
6719 044002 

04 104456 
000115 
023447' 
021736‘ 


104410 
000556 


004737 
103010 


004737 


104456 
000120 
023030’ 
021736' 


104410 
000530 


004737 
103010 
004737 


104456 
000121 
023530’ 
021736‘ 


104410 
000502 


004737 
103010 


004737 


033006 ' 
004100 
000104 
026550' 


026652 ' 


030264' 


026652' 


027566 ' 


026652‘ 


030500’ 


026652' 


134242 
134234 


120$: 


1308: 


1403: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 
BCC 
FTL 
JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


PC , SETBUF 

#ONI! INTE, @PCSRO 
@INTE!START, @PCSRO 
PC ,CHKONI 

120% 


PC ,CHKFTL 
077. ,ERRO12,MSGO003 


TST 


PC ,CLRONI 


130$ 


PC ,CHKFTL 
080. ,ERROO6, MSGOOS 


TST 


PC .CHKTXI 
140$ 


PC ,CHKFTL 
081. ,ERRO13,.MSGO0S 


TST 


PC ,CLRTXI 


150$ 


PC ,CHKFTL 
082. ,ERRO14,MSGO03 


SET UP BUFFERS 
PRECONDITION INTR EN. 
a START PORT COMMAND 


YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
-WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR DNI 
_ ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORE 
- WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR TXI 
ERROR ? 


‘FATL' BIT SET? 
YES, REPORT ERROR 


SEQ 200 


CSERHRD 
77 
ERROi2 
MSGOO3 


C*ESCAPE 
1.10043-. 


CSESCAPE 
L10043-. 








eo - 
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SEQ 201 


qayas a» 


044104 104456 TRAP CSERHRD 
044106 000122 «WORD 82 
044110 023561' -WORD ERROI4 
044112 021736‘ -WORD MSGOO3 
6740 044114 ESCAPE TST AND ABORT TEST 
044114 104410 TRAP CSESCAPE 
_ 044116 000454 -WORD 1L10043-. 
6742 044120 012705 000620‘ MOV #TORB,RS CHECK TORB OWNERSHIP 
6743 044124 004737 027024' JSR PC ,CHKOWN OWN = PORT DRIVER ? 
6744 044130 103010 BCC 160$ YES 
6745 044132 FTL 
044132 004737 026652’ JSR PC ,CHKFTL ‘FATL’ BIT SET? 
6746 044136 ERRHRD 083. ,ERRO18 NO, REPORT ERROR 
044136 104456 TRAP CSERHRD 
044140 000123 -WORD 83 
044142 024026' -WORD ERROIS 
044144 000000 -WORD 0O 
6747 044146 ESCAPE TST ; AND ABORT TEST 
044146 104410 TRAP CSESCAPE 
_— 044150 000422 -WORD 1L10043-. 
6749 044152 012705 016264’ MOV #TDOR14A,R5 ; POINT TO EXPECTED TORB 
6750 044156 004737 032370' JSR PC ,.LDXTOR ; LOAD INTO XTORBO TABLE 
6751 044162 012705 000620’ MOV #TORB,RS ; CHECK TORB 
6752 044166 004737 027500’ JSR PC ,CHKTDR ; ERRORS ? 
6753 044172 103010 BCC 170$ ; NO 7 
6754 044174 FTL 
044174 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
6755 044200 ERRHRD 084. ,ERRO20,MSGOOS ; YES, REPORT ERROR 
044200 104456 TRAP CSERHRD 
044202 000124 -WORD 84 
044204 024206‘ -WORD ERRO2ZO 
044206 022042’ -WORD MSGOO5 
6756 044210 ESCAPE TST ; AND ABORT TEST 
044210 104410 TRAP CSESCAPE 
“ 044212 000360 -WORD L10043-. 
6 
6758 044214 004737 027316’ JSR PC ,CHKRXI ; RXI ? 
6759 044220 103010 BCC 180$ ; YES 
6760 044222 FTL 
044222 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
6761 044226 ERRHRD 085. ,ERRO1S,MSGOO0S ; NO, REPORT ERROR 
044226 104456 TRAP CSERHRD 
044230 000125 .WORD 85 
044232 023627' -WORD ERROIS 
044234 021736' -WORD MSGOOS 
6762 044236 ESCAPE TST ; AND ABORT TEST 
044236 104410 TRAP CSESCAPE 
_ 044240 000332 -WORD L10043-. 
6 





Ta ae 


ayaa ca 
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6764 044242 
6765 

6766 044246 
6767 044250 


6768 044254 


6769 044264 


6770 

6771 044270 
6772 044274 
6773 044300 
6774 044302 


6775 044306 


6776 044316 


6777 

6778 044322 
6779 044326 
6780 044332 
6781 044336 
6782 044342 
6783 044344 


6784 044350 


6785 044360 


6786 
6787 
6788 
6789 044364 
6790 044370 
6791 044374 
6792 044376 
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004737 
103010 


004737 


104456 
000126 
023660’ 
021736' 


104410 
000304 


012705 
004737 
103010 


004737 


104456 
000127 
023726' 
000000 


104410 
000252 


012705 
004737 
012705 
004737 
103010 


004737 


013705 
004737 
103006 


104456 


030432' 


026652’ 


000660' 
027024 ' 


026652’ 


026652’ 


616560' 
030712' 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 


ERRHRD 090. ,ERRO21,MSGO006 


PC ,CLRRXT 
190$ 


PC ,CHKFTL 


- 086. ,ERRO16,MSGO03 


TST 


#RDORB,RS 
PC ,CHKOWN 
200$ 


PC ,CHKFTL 
087. ,ERRO17 


TST 


#RDR2OC RS 


PC. CHKFTL 


ESCAPE TST 


MOV 
JSR 
BCC 


229 
ERRHRL 091 


COMPARE RBUF WITH TBUF 


BYTCNT.RS 
PC .CMPDAT 


$ 
. ERRO22,MSGO07 


WRITE ONE TO CLEAR RXI 
_ ? 


‘FATL’' BIT SET? 
YES, REPORT ERROR 


RAP 
. WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK RORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED RORB 
LOAD INTO XRDRBO TABLE 
CHECK RDORB 

ERRORS ? 

NO 

‘FATL’ BIT SET? 


YES, REPORT ERROR 


AND ABORT TEST 


NUMBER OF DATA COMPARES 
DATA COMPARE ERROR ? 


NO 
YES, REPORT ERROR 


TRAP 





SEQ 202 


CSERHRD 
86 


ERRO16 
MSGO03 


CSESCAPE 
L10043-. 


CSERHRD 
87 
ERRO17 
0 


CSESCAPE 
L10043-. 


CSERHRD 
90 


ERRO21 
MSGO006 


CSESCAPE 
L10043-. 


CSERHRD 
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TEST 13: INTERNAL LOOPBACK TEST 


044400 000133 -WORD 91 
044402 024350‘ -WORD ERRO22 
044404 022346’ -WORD MSG007 
6793 044406 ESCAPE TST ; AND ABORT TEST 
044406 104410 TRAP CSESCAPE 
_— 044410 000162 -WORD L10043-. 
6795 044412 220$: 
6796 044412 012705 006472’ MOV #RBUF +32,R5 ; BASE ADDRESS 
6797 ; OFFSET TO CRC 
6798 044416 004737 030642’ JSR PC ,CMPCRC ; ERRORS ? 
6799 044422 103006 BCC 230$ ; NO 
6800 044424 ERRHRD 092. ,ERRO23,MSGO008 ; YES, REPORT ERROR 
044424 104456 TRAP CSERHRD 
044426 000134 -WORD 92 
C44430 024417' -WORD ERRO2S 
044432 022400’ -WORD MSGO08 
6801 044434 ESCAPE TST ; AND ABORT TEST 
044434 104410 TRAP —§ CSESCAPE 
_ 044436 000134 -WORD L10043-. 
6803 044440 012777 004100 133556 230%: MOV #DNI! INTE, @PCSRC ; PRECONDITION INTR EN. 
6804 044446 112777 000117 133550 MOVB #INTE!STOP ,@PCSRO ; ISSUE STOP PORT COMMAND 
6805 044454 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
6806 044460 103010 BCC 240$ s YES 
6807 044462 FTL 
044462 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
6808 044466 ERRHRD 093. ,ERRO19,MSGOO3 ; NO, REPORT ERROR 
044466 104456 TRAP CSERHRD 
044470 000135 -WORD 93 
044472 024126' -WORD ERROI9 
044474 021736’ -WORD MSGOO3 
6809 044476 ESCAPE TST ; AND ABORT TEST 
044476 104410 TRAP CSESCAPE 
a 044500 000072 -WORD L10043-. 
6811 044502 004737 030264’ 240$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
6812 ; ERROR ? 
6813 044506 103010 BCC 250$ ; NO 
6814 044510 FTL 
044510 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
6815 044514 ERRHRD 094. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
044514 104456 TRAP CSERHRD 
044516 000136 -WORD 94 
044520 023030’ -WORD ERROOG 
044522 021736' -WORD MSGOO3 
6816 044524 ESCAPE TST ; AND ABORT TEST 
044524 104410 TRAP CSESCAPE 
044526 000044 -WORD L10043-. 
6817 044530 250$: 
poe 044530 004737 030346’ JSR PC ,CLINTR ; INSURE DELUA INTR BITS CLEAR 
6820 044534 EXIT TST 
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TEST 13: INTERNAL LOOPBACK TEST 
TRAP CSEXIT 


044534 104432 
044536 000034 -WORD 110043-. 


6822 ;LOCAL TEST MESSAGE 


6824 044540 104 105 114 T13ID:.ASCIZ ‘DELUA INTERNAL LOOPBACK ‘ 


044543 125 101 040 
044546 111 116 124 
044551 105 122 116 
044554 101 114 040 
044557 114 117 117 
044562 120 102 101 
044565 103 113 040 


6825 .EVEN 
6826 
6827 044572 ENDTST 
L10043: 


044572 
044572 104401 TRAP CSETST 
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TEST 14: CRC CHECKING TEST 


6852 


6853 
6854 


6867 
6868 


044574 
044574 
044574 


044574 
044600 


044660 
044662 


012704 
004737 


004737 
103034 
012777 
112777 
004737 
103010 


004737 


104456 
000137 
023030' 
021736' 


104410 
001302 


004737 
103010 


046130’ 
032734! 


033434' 


004100 
000140 
027736‘ 


026652' 


030264’ 


133404 
133376 


SEQ 205 


-SBTTL TEST 14: CRC CHECKING TEST 


5 RHKSERASASASESSESSESESSSALASSERESSSAASALASASSASAS AREA ASEAEKEEALARELSESE SALE LES 


THIS TEST VERIFIES THAT CRC CHECKING MODE IS OPERATIONAL. 
AN INTERNAL LOOPBACK IS PERFORMED WHILE IN 

THE DISABLE TRANSMIT CRC MODE. 

WITH A GOOD CRC VALUE APPENDED TO THE TRANSMIT BUFFER 

AN ERROR FREE LOOPBACK IS EXPECTED. 


TEST SEQUENCE: 
1. WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM, 
and DISABLE TRANSMIT CRC MODE 
WRITE RING FORMAT 


WRITE PHYSICAL ADDRESS 

SET UP RINGS AND BUFFERS 

APPEND GOOD CRC VALUE TO TRANSMIT BUFFER 
ISSUE START 

CHECK FOR ERRORS 

ISSUE STOP 


kKKKKASAAAKAAKEALEAREARSARARARERAEAAERAEEASEAAGASESSAAAALEEAESEALALE SALE EE ELE 


Onaonu Sw 


BGNTST 
T14:: 


PNTMAC 114ID 


MOV #T14ID,R4 ;GET POINTER TO TEST NAME MESSAGE 
JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
i END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 30$ ; NO 
MOV @DNI! INTE, 8PCSRO ; PRECONDITION INTR EN. 
MOVB #INTE!RSET ,@PCSRO ; YES, RESET DELUA 
JSR PC ,CKONI ; DONI ? 
BCC 20$ ; YES 
FTL 
JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 095. ,ERROO6,MSGOO0S ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 95 
-WORD ERROOG6 
-WORD MSGOOS 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10044-. 
i 
20%: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
; ERROR ? 
BCC 30$ ; NO 
FTL 
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044662 
6869 044666 


6899 045036 


004737 


103010 


004737 


104456 
000141 
023245’ 
021736' 


104410 
001176 


004737 
103010 


004737 


026652’ 


030212’ 


026652’ 


030264 ' 


026652' 


012620' 
032002 ' 


004100 133200 
000102 133172 


026550’ 





133300 
133272 


30$: 


40$: 


;WRITE MODE REGISTER = INTERNAL LOOPBACK, 
50$: 


JSR PC ,CHKFTL 

ERRHRD 096. ,ERROO6,MSGOOS 
ESCAPE TST 

JSR PC ,CLRBUF 

JSR PC ,LDDFLT 

JSR PC ,LDPCSR 

MOV #DNI! INTE, @PCSRO 
MOVB #INTE!GETPCB ,@PCSRO 
JSR PC ,CHKONI 

BCC 40$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 097. ,ERROO9, MSGOOS 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 50$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 100. ,.ERROO6,MSGOOS 


ESCAPE TST 


MOV @uTMOD2 RS 

JSR PC ,LDPCBB 

MOV @DNI! INTE, APCSRO 
MOVB @INTE!GETCMD ,@PCSRO 
JSR PC ,CHKDNI 

BCC 60$ 


; ‘FATL’ BIT SET? 

; YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
. WORD 

; AND ABORT TEST 
TRAP 
. WORD 


sCLEAR XMIT,RECV BUFFERS 

;LOAD DEF PHY.ADDRESS TABLES 

; ADDRESS OF PCBB -> PCSR2!3 
PRECONDITION INTR EN. 


: 
; ISSUE GET_PCBB PORT COMMAND 
; DNI? 
; YES 
; ‘FATL' BIT SET? 
; NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
. WORD 
; AND ABORT TEST 
TRAP 
. WORD 


; WRITE ONE TO CLEAR DONI 
: a ? 


; ‘FATL’' BiT SET? 

; YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 

; AND ABORT TEST 
TRAP 
. WORD 


TRANSMIT CRC 
LOAD FUNCTION -> PCBB 
: PRECONDITION INTR EN. 
: ISSUE GET_CMD PORT COMMAND 
; DN? ? 


; YES 


SEQ 206 


CSERHRD 
96 


ERROO6 
MSGO03 


CSESCAPE 
Li 


CSERHRD 
97 


ERROO9 
MSGOO3 


CSESCAPE 
L10044-. 


CSERHRD 


CSESCAPE 
L10044-. 


PROM AND DISABLE XMIT CRC MODE 
WRITE MODE FUNCTION, DISABLE 
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— 


6900 045040 


6901 


6925 
6926 
6927 

6928 045200 
6929 045202 
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004737 


104456 
000145 
023331’ 
021736’ 


104410 
001076 


004737 
103010 


004737 


104456 
000146 
023030’ 
021736’ 


104410 
001050 


012705 


103010 


004737 


104456 
000147 
023331' 
021736' 


104410 
000762 


004737 
103010 


026652’ 


030264 ' 


026652’ 


012540' 
032002' 


030264 ' 


133064 
133056 


FTL 
JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


PC ,CHKFTL 
101. ,ERRO10,MSGOO3 


TST 


PC ,CLRONI 
70$ 


PC ,CHKFTL 
102. ,ERROO6,MSGOO03 


TST 


;WRITE RING FORMAT 


70$: 





@WTRNGS ,RS 


PC ,LDUD8B 

@ONI! INTE, @PCSRO 
@INTE!GETCMD , @PCSRO 
PC ,CHKDNI 

80$ 

PC ,CHKFTL 

103. ,ERRO1O, MSGO03S 


TST 


PC ,CLRONI 
Sos 


SEQ 207 


‘FATL’ BIi SET? 
NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 101 
-WORD ERRO1O 
-WORD MSGOO03 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10044-. 
WRITE ONE TO CLEAR DONI 


ERROR ? 
NO 


‘FATL' BIT SET? 


YES, REPORT ERROR 
TRAP CSERHRD 


-WORD 102 

-WORD ERROOG 

-WORD MSGOOS 
AND ABORT TEST 

TRAP CSESCAPE 

-WORD L10044-. 


DEFAULT WRITE RING FORMAT FUNCTION 
LOAD FUNCTION -> PCBB 

DEFAULT RING FORMAT 

FORMAT = SIX WORDS 

LOAD RING FORMAT -> UDBB 
PRECONDITION INTR EN. 

ISSUE GET_CMD PORT COMMAND 


DNI ? 

YES 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
WORD 103 
-WORD ERRO10 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10044-. 

WRITE ONE TO CLEAR ONI 

-_ eae 





HARDWARE TESTS 


6930 


6953 


6954 
6955 
6956 
6957 
6958 
6959 


045202 


045300 
345302 


045304 


045310 
045312 


045312 


045316 
045316 
045320 
045322 
045324 
045326 
045326 
045330 


045332 
045336 
045342 
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004737 


012705 
004737 
012705 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000151 
023331‘ 
021736‘ 


104410 
000652 


004737 
103010 


004737 


104456 
000152 
023030’ 
021736’ 


104410 
000624 


012705 
004737 
012705 


026652’ 


000272' 
032050‘ 
012500‘ 
032002 ' 
004100 
000102 
026550' 


026652’ 


030264’ 


026652’ 


;WRITE PHYSICAL 


3 
100$: 


;SET UP 
110$: 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


PC ,CHKFTL 
104. ,ERROO6 ,MSGO03 


TST 


ADDRESS 


@DFAULT,RS 

PC ,.LDPHYA 
@WTPHYA,RS 

PC ,LOPCBB 

@ONI! INTE, SPCSRO 
@INTE!GETCMD ,aPCSRO 
PC ,.CHKDNI 

100$ 

PC ,CHKFTL 


105. ,ERRO1LO,MSGOO3 


TST 


PC ,CLRONI 
1103 


PC .CHKFTL 
106. ,ERROO6.MSGOOS 


TST 


RINGS FOR ONE BUFFER LOOPBACK 


MOV 
JSR 
MOV 


$TORB1B,RS 
PC ,.LDTDRB 
#RORB1IA,RS 


SS LL 


SEQ 208 

‘FATL' BIT SET? 
YES, REPORT ERROR 

RAP CSERHRD 

-WORD 104 

-WORD ERROOG 

-WORD MSGOO3 
AND ABORT TEST 

TRAP CSESCAPE 

-WORD L19044-. 


GET DEFAULT PHYSICAL ADDRESS 
STORE IT IN DEFAULT TABLE 
DEFAULT WRITE PHYSICAL ADDR FUNC 
LOAD FUNCTION -> PCBB 
PRECONDITION INTR EN. 

ov GET_CMD PORT COMMAND 


YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 105 
-WORD ERRO10 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD Li0044-. 

WRITE ONE TO CLEAR ONI 

ERROR ? 

NO 

‘FATL’' BIT SET? 

YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 106 
-WORD ERROO6 
-WORD MSGOO3 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10044-. 


DEFAULT ONE BUFFER TRANSMIT RING 
LOAD TORB 
DEFAULT ONE BUFFER RECEIVE RING 





(ne = a ERR SE Bo entero 
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6960 045346 004737 032070' 


6987 045504 


6988 
6989 045510 


ERB ey EON a le 


012737 
012737 
004737 


012777 
112777 


004737 
103010 


004737 


104456 
000153 
023447' 
021736’ 


104410 
000522 


004737 
103010 


004737 


030264 ' 


026652’ 


027566‘ 


026652’ 


030500' 


016562’ 
016560' 


132624 
132616 


;SET UP BUFFERS 


1208: 


1308: 


JSR 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 
BCC 
FTL 
JSR 


ERRHRD 


ESCAPE 


JSR 


PC ,LDRDRB 

AND START 

#1 ,D0CRC 

#6 .BYTCNT 

PC ,SETBUF 
@ONI! INTE ,@PCSRO 
@INTE!START, @PCSRO 
PC ,CHKONI 

120$ 

PC, CHKFTL 


107. ,ERRO12,MSG003 


TST 


PC ,CLRONI 
130$ 


PC ,CHKFTL 
110. ,ERROO6 , MSGOO3 


TST 
PC .CHKTXI 


140$ 


PC ,CHKFTL 
111. ,ERRO13,MSGO03 


TST 


PC ,CLRTXI 





ee @s Ge 


LOAD RORB 


APPEND CRC AND SAVE 
DATA BYTES/PACKET 
SET UP BUFFERS 


PRECONDITION INTR EN. 
a START PORT COMMAND 


YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR DONI 
_— ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
RAP 
- WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. KORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NC, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR TXI 





SEQ 209 


CSERHR) 
107 


ERRO12 
MSGO003 


CSESCAPE 
L10044-. 


CSERHRD 


CSESCAPE 
L10044-. 


CSERHRD 


CSESCAPE 
L10044-. 





anand 
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6990 
6991 045514 
6992 045516 


103010 


004737 


6993 045522 

104456 
000160 
023561‘ 
021736‘ 


104410 
000420 


012705 
004737 
103010 


004737 


7000 045554 

104456 
000161 
024026 ' 
000000 


104410 
000366 


012705 
004737 
012705 
004737 
103010 


004737 


7009 045616 

104456 
000162 
024206 ' 
022042' 


104410 
000324 


004737 
103010 


7010 045626 


7011 

7012 045632 
7013 045636 
7014 045640 


045640 
7015 045644 
045644 


004737 


104456 


026652’ 


000620' 
027024' 


026652 ' 


016274’ 
032370' 
000620' 
027500' 


026652’ 


027316’ 


026652 ' 


: 
150$: 


1608: 


; 
170$: 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 


150$ 


PC ,CHKFTL 
112. ,ERRO14,MSGOO3 


TST 


#TORB,RS 
PC ,CHKOWN 
160$ 


PC ,CHKFTL 
113. ,ERRO18 


TST 


@TDR1ISA,RS 
PC ,LDXTOR 
#TORB.RS 
PC ,CHKTDR 
170$ 


PC ,CHKFTL 
114. ,ERRO20,MSGOO0S 


TST 
PC ,CHKRXI 
180$ 


PC ,CHKFTL 


ERRHRD 115. ,ERRO15,MSGO0S 


; ERROR ? 
; NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


POINT TO EXPECTED TORB 
LOAD INTO XTORBO TABLE 
CHECK TDRB 

ERRORS ? 

NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST - 
TRAP 
. WORD 
RXI ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 


re 


SEQ 210 


CsERHRD 


CSESCAPE 
L10044-. 


CSERHRD 
113 
— 


CSESCAPE 
L10044-. 


CSESCAPE 
L10044-. 


CSERHRD 








ee eS a LT LY 





70640 
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TEST 14: CRC CHECKING TEST 
045646 000163 -WORD i115 
045650 023627' -WORD ERROIS 
045652 021736’ «WORD MSGOO3 
7016 045654 ESCAPE TST ; AND ABORT TEST 
045654 104410 TRAP CSESCAPE 
—_ 045656 000276 -WORD 1L10044-, 
3 
7018 045660 004737 030432’ 180$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
7019 ; ERROR ? 
7020 045664 103010 BCC 190$ ; NO 
7621 045666 FTL 
045666 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7022 045672 ERRHRD 116. ,ERRO16,MSGO03 ; YES, REPORT ERROR 
045672 104456 RAP CSERHRD 
045674 000164 «WORD 116 
045676 023660' -WORD ERRO1I6 
045700 021736' -WORD MSGOOS 
7023 045702 ESCAPE TST ; AND ABORT TEST 
945702 104410 TRAP CSESCAPE 
rene 045704 000250 -WORD 1L10044-. 
‘ ‘ 
7025 045706 012705 000660‘ 190$: MOV @RDORB,RS ; CHECK RDRB OWNERSHIP 
7026 045712 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
7027 045716 103010 BCC 200$ ; YES 
7028 045720 FTL 
045720 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7029 045724 ERRHRD 117. ,ERRO17 ; NO, REPORT ERROR 
045724 104456 TRAP CSERHRD 
045726 000165 -WORD 117 
045730 023726' -WORD ERRO17 
045732 -WORD O 
7030 045734 ESCAPE TST ; AND ABORT TEST 
045734 104410 TRAP CSESCAPE 
— 045736 000216 -WORD 110044-. 
7032 045740 012705 016374’ 200$: MOV #RDR14B,RS ; POINT TO EXPECTED RDRB 
7033 045744 004737 032340’ JSR PC ,LDXROR ; LOAD INTO XRDRBO TABLE 
045750 012705 000660‘ MOV #RORB RS ; CHECK RDRB 
7035 045754 004737 027206’ JSR PC ,CHKRDR ; ERRORS ? 
7036 045760 103010 BCC 210$ ; NO 
7037 045762 FTL 
045762 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7038 045766 ERRHRD 120. ,ERRO21,MSGO006 ; YES, REPORT ERROR 
645766 104456 TRAP CSERHRD 
045770 000170 -WORD 120 
045772 024267’ -WORD ERRO2i 
045774 022204’ -WORD MSGO06 
7039 045776 ESCAPE TST ; AND ABORT TEST 
045776 104410 T.AtAP CSESCAPE 
000154 .WORD 1L10044-. 





eS 


SE@ 212 
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Les. ;COMPARE RBUF WITH TBUF 
042 
7043 046002 013705 016560’ 210$: MOV BYTCNT.RS ; COMPARE DATA 
7044 046006 004737 030712’ JSR PC ,CMPDAT ; DATA COMPARE ERROR ? 
7045 046012 103006 BCC 230$ + NO 
7046 046014 ERRHRD 121. ,ERRO22,MSGO07 ; YES, REPORT ERROR 
046014 104456 AP CSERHRD 
046016 000171 WORD i121 
046020 024350‘ WORD ERRO22 
04 022346' WORD MSG007 
7947 046024 ESCAPE TST ; AND ABORT TEST 
046024 104410 TRAP CSESCAPE 
_— 046026 000126 -WORD Li -. 
7049 046030 012777 004100 132166 230$: MOV #DNI! INTE, BPCSRO ; PRECONDITION INTR EN. 
7050 046036 112777 000117 132160 MOVB #INTE!STOP ,@PCSRO ; ISSUS. STOP PORT COMMAND 
7051 046044 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
7052 046050 103010 BCC 240$ ; YES 
7053 046052 FTL 
046052 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7054 046056 ERRHRD 122. ,ERF019,MSGOOS ; NO, REPORT ERROR 
04 104456 TRAP CSERHRD 
046060 000172 -WORD 122 
046062 024126' -WORD ERROI9 
04 021736' -WORD MSGOO3S 
7055 046066 ESCAPE TST ; AND ABORT TEST 
04 104410 TRAP CSESCAPE 
046070 000064 -WORD 110044-. 
7057 046072 004737 030264' 240$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
7058 ; ERROR ? 
7059 046076 103010 BCC 250$ ; NO 
7060 046100 FTL 
046100 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL' BIT SET? 
7061 046104 ERRHRD 123. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
046104 104456 TRAP CSERHRD 
046106 000173 -WORD 123 
046110 023030’ . ERROO6 
046112 021736’ WORD MSGOOCS 
7062 046114 ESCAPE TST ; AND ABORT TEST 
046114 104410 TRAP CSESCAPE 
046116 000036 -WORD 1L10044-. 
7063 046120 250$ : 
Lao 046120 004737 030346’ JSR PC,CLINTR ; INSURE DELUA INTR BITS CLEAR 
7066 046124 EXIT TST 
046124 104432 TRAP CSEXxIT 
046126 000026 -WORD L1i0044-. 





ne 
SEQ 213 
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TEST 14: CRC CHECKING TEST 


7068 ;LOCAL TEST MESSAGE 


7069 
7070 046130 104 105 114 T1i4ID:.ASCIZ ‘DELUA CRC CHECKING ' 
046133 125 101 040 


7971 .EVEN 


7073 046154 ENOTST 
046154 L10044: 
046154 104401 


TRAP CSETST 
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TEST 15: FORCE CRC ERROR TEST 
Led .SBTTL TEST 15: FORCE CRC ERROR TEST 
7077 sRRaEEEEREAEEAREEE ERASERS ERAEEEREEEEEAEEEEEERAEEEREEEEE DEEDES EERE EE EEE EE 
7078 : 
7079 ; THIS TEST VERIFIES THAT A CRC ERROR CAN BE DETECTED. 
7080 ; AN INTERNAL LOOPBACK IS PERFORMED WHILE IN 
7081 : THE DISABLE TRANSMIT CRC MODE. 
7082 : WITH A BAD CRC VALUE APPENDED T0 THE TRANSMIT BUFFER 
Ls ; A CRC ERROR IS EXPECTED IN THE RECEIVE DESCRIPTOR RING. 
: 
7085 : TEST SEQUENCE: 
7086 : 1. WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM, 
7087 : . and DISABLE TRANSMIT CRC MODE 
7088 ; 2. WRITE RING FORMAT 
7089 ; 3. WRITE PHYSICAL ADDRESS 
7090 : 4. SET UP RINGS AND BUFFERS 
7091 ; S. APPEND BAD CRC VALUE TO TRANSMIT BUFFER 
7092 : 6. ISSUE START 
7093 : 7. CHECK FOR CRC ERROR IN RDORB+4 
Lae : 8. ISSUE STOP 
7096 WTTTTT TTT TT TTT TT TTT TTT TT TTT TTT TT LL 
7097 
7098 046156 BGNTST 
046156 T15:: 
7099 
7100 046156 PNTMAC TiSID 
046156 012704 047544’ MOV $TiSID,.R4 ;GET POINTER TO TEST NAME MESSAGE 
046162 004737 032734’ JSR PC ,PNTID sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC‘ 
7101 046166 004737 033434’ JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
7102 046172 103034 BCC 30% ; NO 
7103 046174 012777 004100 132022 MOV @DNI! INTE. @PCSRO ; PRECONDITION INTR EN. 
7104 046202 112777 000140 132014 MOVB #INTE! RSET .@PCSRO ; YES, RESET DELUA 
7105 046210 004737 027736’ JSR PC ,CKDNI ; ONI 7? 
7106 046214 103010 BCC 20% ; YES 
7107 046216 FTL 
046216 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ SIT SET? 
7108 046222 ERRHRD 124. ,.ERROO6,.MSGOO0S ; NO, REPORT ERROR 
046222 104456 TRAP CSERHRD 
046224 000174 -WORD 124 
046226 023030' -WORD ERROOS 
021736‘ -WORD MSGOOS 
7109 046232 ESCAPE TST ; AND ABORT TEST 
046232 104410 TRAP CSESCAPE 
_— 046234 001340 -WORD 110045-. 
5 
7il1 046236 004737 030264’ 20%: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
7112 ; ERROR ? 
7113 046242 103010 BCC 30$ ; NO 
7114 046244 FTL 
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7115 


046244 


7145 046422 


MACRO YOS.02 Friday 12-Jul-85 09:33 Page 106-1 


CRC ERROR TEST 
004737 026652’ 


030212‘ 
031732' 


030264 ' 


026652‘ 


012620’ 
032002 ' 


000192 
026550’ 


131716 
131710 


000302’ 
131610 
131602 


; 
30$: 


JSR PC ,CHKFTI. 
ERRHRD 125. ,ERROO6,MSGO0S 


ESCAPE TST 

JSR PC ,CLRBUF 

JSR PC .LDDFLT 

JSR PC,LDPCSR 

MOV #ONI INTE , @PCSRO 
MOVB @INTE!GETPCB ,@PCSRO 
JSR PC ,CHKDNI 

BCC 40$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 126. ,ERROO9,MSGOOS 


ESCAPE TST 

JSR PC,CLRONI 
BCC 50$ 

FTL 

JSR PC .CHKFTL 


ERRHRD 127. ,ERROO6,MSGOOS 


ESCAPE TST 


;WRITE MODE REGISTER = INTERNAL LOOPBACK, 


50$: 


MOV GWTMOD2 RS 

JSR PC ,LOPC8B 

MOV MODE 15 ,PCBB+2 

MOV @ONI! INTE , @PCSRO 
MOVB #INTE!GETCMD .@PCSRO 
JSR PC ,CHKONI 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 





SEQ 215 


f$SERHRD 
125 


ERROO6 
MSGOO03 
CSESCAPE 
L10045-. 


CLEAR TRANSMIT AND RECV BUFFERS 
LOAD DEFAULT PHY.ADDRESS TABLES 


ADDRESS OF PCBB -> PCSR2!3 
ISSUE GET_PCBB PORT COMMAND 
ONI? 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ak 


‘FATL‘ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


PROM AND DISABLE XMIT CRC MODE 


WRITE MODE FUNCTION, DISABLE 


TRANSMIT CRC 
LOAD FUNCTION -> PCBB 
LOAD MODE REGISTER 


ISSUE GET_CMD PORT COMMAND 
ONI ? 
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7146 046426 
7147 046430 


046430 
7148 046434 
04 


7172 
7173 046564 
7174 
7175 046570 





MACRO YOS.02 Friday 12-Jul-85 09:33 Page 106-2 


103010 


004737 


104456 
000202 
023331' 
021736‘ 


104410 
001126 


004737 
103010 


004737 


CRC ERROR TEST 


026652 ' 


030264' 


026652' 


026652‘ 


030264 ' 


131474 
131466 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


60$ 


PC ,CHKFTL 
130. ,.ERRO10,MSGO03 


TST 


PC ,CLRONI 
70$ 


PC ,CHKFTL 
131. ,ERROO6,MSGOOS 


TST 


;WRITE RING FORMAT 


70$: 


MOV 


ESCAPE 


PC ,.LDUDBB | 
OONI! INTE , @PCSRO 
one 


PC ,CHKFTL 
132. ,ERRO10, MSGOOS 


TST 


PC ,CLRONI 
90$ 


YES 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP 
.WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR DNI 
= ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 





SEQ 216 


CSERHRD 


130 
ERRO10 
MSGO03 


CSESCAPE 
L10045-. 


CSERHRD 
131 
ERROOG 
MSGOOS 


CSESCAPE 
L10045-. 


DEFAULT WRITE RING FORMAT FUNCTION 


LOAD FUNCTION -> PCBB 
DEFAULT RING FORMAT 

FORMAT = SIX WORDS 

LOAD RING FORMAT -> UD8B 
ISSUE GET_CMD PORT COMMAND 
ONI ? 


YES 


'FATL’' BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
— ? 


CSESCAPE 
L10045-. 
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TEST 15: FORCE CRC ERROR TEST 


7176 046572 FTL 
046572 004737 v26652' JSR PC ,CHKFTL ; ‘FATL’‘ BIT SET? 
7177 046576 ERRHRD 133. ,ERROO6,MSGO03S ; YES, REPORT ERROR 
046576 104456 TRAP CSERHRD 
046600 000205 . WORD 133 
046602 023030’ -WORD ERROOG 
046604 021736’ -WORD MSGO03 
7178 046606 ESCAPE TST ; AND ABORT TEST 
046606 104410 TRAP CSESCAPE 
_— 046610 000764 -WORD 1L10045-. 
La sWRITE PHYSICAL ADDRESS 
7182 046612 90$: 
7183 046612 012705 000272‘ MOV #DFAULT,RS ; GET DEFAULT PHYSICAL ADDRESS 
7184 046616 004737 032050' JSR PC, .LOPHYA ; SAVE IT IN DEFAULT TABLE 
7185 046622 012705 0612500’ MOV @WTPHYA,RS ; DEFAULT WRITE PHYSICAL ADDR FUNC 
7186 046626 004737 032002' JSR PC ,LOPCBB ; LOAD FUNCTION -> PCBB 
7187 046632 012777 004100 131364 MOV @DNI! INTE, @PCSRO 
7188 046640 112777 000102 131356 MOVB @INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
7189 046646 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
7190 046652 103010 BCC 100$ ; YES 
7191 046654 FTL 
046654 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
7192 046660 ERRHRD 134. ,ERRO10,MSGOOS ; NO, REPORT ERROR 
046660 104456 TRAP CSERHRD 
046662 06 -WORD 134 
046664 023331' -WORD ERROIO 
046666 021736' .WORD 
7193 046670 ESCAPE TST ; AND ABORT TEST 
046670 104410 TRAP CSESCAPE 
— 046672 000702 -WORD 1L10045-. 
7195 046674 004737 030264’ 1003: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
7196 ; ERROR ? 
7197 046700 103010 Bcc 110% 3; NO 
7198 046702 FTL 
046702 004737 026652’ JSR PC ,CHKFTL ; ‘FATL'‘ BIT SET? 
7199 046706 ERRHRD 135. ,ERROO6G,MSGOOS ; YES, REPORT ERROR 
046706 104456 TRAP CSERHRD 
046710 000207 -WORD 135 
046712 023030’ ERROO6 
046714 021736' : -WORD MSGOOS 
7200 046716 ESCAPE TST ; AND ABORT TEST 
046716 104410 TRAP CSESCAPE 
aia 046720 000654 -WORD 1L10045-. 
Ln ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
7204 046722 012705 014450’ 110$: MOV #TORB1B,RS ; DEFAULT ONE BUFFER TRANSMIT RING 
7205 046726 004737 032164’ JSR PC ,LDTORB ; LOAD TORB 
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TEST 15: FORCE CRC ERROR TEST 


SEQ 218 


7206 046732 012705 012750’ MOV #RORB1IA,RS ; DEFAULT ONE BUFFER RECEIVE RING 

Li 046736 004737 032070‘ JSR PC ,LDRDRB ; LOAD RORB 

i. ;SET UP BUFFERS AND START 

i 

721.1 046742 012705 000302’ MOV #PCBB+2,R5 ; POINT TO DESTINATION ADDRESS 

7212 046746 004737 031704’ JSR PC ,LDDEST ; LOAD DEST 

7213 046752 012737 000001 016562' MOV #1 ,DOCRC ; APPEND CRC 

7214 046760 0127237 000006 016560’ MOV #6 .BYTCNT ; DATA BYTES/PACKET 

7215 046766 004737 033006‘ JSR PC ,SETBUF ; SET UP BUFFERS 

7216 046772 012700 002436' MOV #TBUF ,RO ; BASE ADDRESS 

7217 046776 062700 000034 ADD #34,RO ; OFFET TO CRC 

7218 047002 05020 CLR CRO)+ ; ALTER DATA TO CAUSE 

7219 047004 005020 CLR CRO)+ ; CRE ERROR W/CALCULATED 

7220 047006 012777 004100 131210 MOV #DNI! INTE, @PCSRO 

7221 047014 112777 000104 131202 MOVB #INTE!START,@PCSRO ; ISSUE START PORT COMMAND 

7222 047022 004737 026550’ JSR PC ,CHKONI ; ONI? . 

7223 047026 103010 BCC 120$ ; YES 

7224 047030 FTL 
047030 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

7225 047034 ERRHRD 136. ,ERRO12,MSGO0S ; NO, REPORT ERROR 
047034 104456 TRAP CSERHRD 
047036 000210 -WORD 136 
047040 023447' -WORD ERROI2 
047042 021736' MSGOO3 

7226 047044 ESCAPE TST ; AND ABORT TEST 
047044 104410 TRAP CSESCAPE 

ones 047046 000526 -WORD L10045-. 

; 

7228 047050 004737 030264' 120$: JSR PC ,CLRONI 3; WRITE ONE TO CLEAR ONI 

7229 ; ERROR 7? 

7230 047054 103010 BCC 130$ ; NO 

7231 047056 FTL. 
047056 004737 026652’ JSR PC ,CHKFTL 3; ‘FATL' BIT SET? 

7232 047062 ERRHRD 137. ,ERROO6.MSGOOS 3; YES, REPORT ERROR 
047062 104456 TRAP CSERHRD 
047064 000211 -WORD 137 
047066 023030’ -WORD ERROOG 
047070 021736’ -WORD MSGOOS 

7233 047072 ESCAPE TST ; AND ABORT TEST 
047072 104410 TRAP CSESCAPE 

vate 047074 000500 -WORD 1L10045-. 

; 

7235 047076 004737 027566’ 130$: JSR PC ,CHKTXI ; TXI ? 

7236 047102 103010 BCC 140$ ; YES 

7237 047104 FTL 
047104 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 

7238 047110 ERRHRD 140. ,ERRO13,MSGO03S ; NO, REPORT ERROR 
047110 104456 TRAP CSERHRD 
047112 000214 .WORD 140 
047114 023530’ .WORD ERROI3 
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TEST 15: FORCE CRC 


7250 047162 
7251 047164 


047164 
7252 047170 


254 

7255 047204 
7256 047210 
7257 047214 
7258 047220 
7259 047224 
7260 047226 


047226 
7261 047232 
047232 
047234 
047236 
047240 
7262 047242 
047242 


7264 047246 
7265 047252 


104410 
000452 


004737 
103010 


ERROR TEST 
021736’ 


030500' 


02:6652' 


000620' 
027024 ' 


026652 ' 


016274' 
032370' 


026652’ 


027316' 


: 
140$: 


1508: 


; 
160$ : 


? 
170$: 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


TST 


PC ,.CLRTXI 
150$ 


PC ,CHKFTL 
141. ,ERRO14,MSGO03 


TST 


@TORB,.RS 
PC ,CHKOWN 


160$ 


PC .CHKFTL 
142. ,ERRO18 


TST 


#TORISA,RS 


PC ,CHKFTL 
143. ,ERRO20,MSGO0S 


TST 


PC ,CHKRXI 
180$ 





nea 


AND ABORT TEST 


WRITE ONE TO CLEAR TXI 


ERROR ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


CHECK TORB OWNERSHIP 


OWN = PORT DRIVER ? 
YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


TRAP 


POINT TO EXPECTED TORB 
LOAD INTO XTDORBO TABLE 
CHECK TORB 


ERRORS ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


RXI ? 
YES 


SEQ 219 


MSGO03 


CSESCAPE 
L10045-. 


CSERHRD 
143 


ERRO2O 
MSGOOS 


CSESCAPE 
L10045-. 





ae ne ee nner 
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TEST 15: FORCE CRC ERROR TEST 


SEQ 220 


7266 047254 FTL 
047254 004737 026652’ JSR PC ,CHKFTL ; 'FATL’ BIT SET? 
7267 047260 ERRHRD 144. ,ERRO15,MSGOOS ; NO, REPORT ERROR 
047269 104456 TRAP CSERHRD 
047262 000220 “WORD 144 
047264 023627’ -WORD ERROIS 
047266 021756’ -WORD MSGO03 
7268 047270 ESCAPE TST ; AND ABORT TEST 
047270 104410 TRAP CSESCAPE 
— 047272 0003502 -WORD 110045-. 
; 
7270 047274 004737 030432’ 180$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
7271 ; ERROR 7? 
7272 047300 103010 BCC 190$ : 
7273 047302 FTL 
047302 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
7274 047306 ERRHRD 145. ,i"R016,MSGO03 ; YES, REPORT ERROR 
047306 104456 TRAP CSERMRD 
047310 000221 Word 345 
047312 023660' -WORD EWRROIG 
047314 021736' -WORD MSGO003S 
7275 047316 ESCAPE TST ; AND ABORT TEST 
047316 104410 TRAP CSESCAPE 
7076 047320 000254 -WORD 1L10045-. 
i 
7277 047322 012705 000660’ 190$: MOV @RORB , RS ; CHECK RORB OWNERSHIP 
7278 047326 004737 027024' JSR PC .CHKOWN ; OWN = PORT ORIVER 7? 
7279 047332 103010 BCC 200% ; YES 
7280 047324 FTL 
047334 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7281 047340 ERRHRD 146. ,ERRO17 ; NO, REPORT ERROR 
047340 104456 TRAP CSERHRD 
047342 000222 -WORD 146 
047344 023726' -WORD ERRO17 
047346 -WORD 0 
7282 047350 ESCAPE TST ; AND ABORT TEST 
047350 104410 TRAP CSESCAPE 
_ 047352 000222 -WORD 1L10045-. 
i 
7284 047354 012705 016404’ 200$: MOV @ROR1ISA.RS ; POINT TO EXPECTED RORB 
7285 047360 004737 032340' JSR PC LOX s LOAD INTO XRORBO TABLE 
7266 047364 012705 000660' MOV ORDRB,RS ; CHECK RORB 
7287 047370 004737 027206’ JSR PC ,CHKROR 3; ERRORS ? 
7288 047374 103010 Bcc 210% ; 
7289 047376 FTL 
047376 004737 026652' JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
7290 047402 ERRHRD 147. ,ERRO21,MSGO06 ; YES, REPORT ERROR 
047402 104456 TRAP CSERHRD 
047404 000223 WORD 147 
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TEST 15: FORCE CRC 


047512 
047514 


047514 
047520 


ERROR TEST 
024267' 
022204 ° 
ESCAPE TST 
104410 
000160 
;COMPARE RBUF WITH TBUF 
013705 016560’ 210$: MOV BYTCNT,RS 
004737 030712’ JSR PC ,CMPDAT 
103006 BCC 230$ 
ERRHRD 150. ,ERRO22,MSG007 
104456 
000226 
024350' 
022346 ' 
ESCAPE TST 
104410 
700132 
012777 004100 130552 230$: MOV @ONI! INTE, @PCSRO 
112777 000117 130544 MOVB @INTE! STOP ,@PCSRO 
004737 026550' JSR PC ,CHKONI 
103010 BCC 240$ 
FTL ; 
004737 026652‘ JSR PC .CHKFTL 
ERRHRD 151.,ERRO19,MSGOOS 
104456 
000227 
024126' 
021736' 
ESCAPE TST 
104410 
000070 
3 
004737 030264‘ 240$: JSR PC ,CLRONI 
103010 BCC 2508 
FTL 
004737 026652’ JSR PC ,CHKFTL 
ERRHRD 161. ,ERRO06,MSGO03 
104456 
000241 
023030' 
021736' 
ESCAPE TST 
104410 
000042 
2503: 
004737 030346’ JSR PC ,CLINTR 
EXIT TST 


ee eee 


. WORD 
. WORD 
AND ABORT TEST 
TRAP 
.WORD 
COMPARE DATA 
= COMPARE ERROR ? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 


ISSUE STOP PORT COMMAND 
ONI ? 
YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


INSURE DELUA INTR BITS CLEAR 


TRAP 





SEQ 221 
ERRO21 
MSGO006 


CSESCAPE 
L10045-. 


CSERHRD 
150 


ERRO22 
MSG007 


CSESCAPE 
L10045-. 


CSESCAPE 
L10045-. 


CSESCAPE 
L10045-. 


CSEXIT 





ns ee LT 





- me -  EE = e 
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TEST 15: FORCE CRC ERROR TEST 
lit 047542 000032 .WORD L10045-, 
7320 ;LOCAL TEST MESSAGE 
7321 


7322 047544 104 105 114 TiSID:.ASCIZ ‘DELUA FORCE CRC ERROR ‘ 


7323 .EVEN 


7324 
7325 047574 ENDTST 
L10045: 


047574 
047574 104401 TRAP CSETST 








EN 





eS A TT 
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TEST 16: NO RECEIVE BUFFER TEST 


7366 


7367 


027736' 


026652’ 


130402 
130374 





SEQ 223 
.SBTTL TEST 16: NO RECEIVE BUFFER TEST 
seaRAAREERAEAEEEAEEAERAAAEAEEEEEAAEEREAEEEEEEEEEEEEAEEEEEE ESE EE EERE EE EES 
THIS TEST VERIFIES THAT A RCBI ERROR CAN BE DETECTED. 
THIS ERROR WILL ONLY GCCUR AFTER 47. RECEIVE ENTRIES 
(SIZE OF INTERNAL RECEIVE BUFFER), FOR CASE WHERE NO 
RECEIVE BUFFERS ARE OWNED BY THE DELUA. 
TEST SEQUENCE: 
1. WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
2. WRITE RING FORMAT 
3. WRITE PHYSICAL ADDRESS 
4. SET UP RINGS AND BUFFERS WITH 49. 
TRANSMIT PACKETS, AND NO RECEIVE 
BUFFERS OWNED BY THE DELUA. 
5. INSURE ‘RECEIVE PACKET LOST’ COUNTER IS CLEAR 
6. ISSUE START 
7. AFTER EACH OF THE FIRST 47. TRANSMISSION’S, 
‘RECEIVE PACKET LOST’ COUNTER SHOULD BE CLEAR, 
AND THERE SHOULD BE ‘RCBI’ ERROR 
8. FOLLOWING NEXT (48TH) TRANSMISSION, ‘RCBI’ ERROR 
BIT IN PCSRO SHOULD SET AND, ‘RECEIVE PACKET LOST’ 
COUNTER SHOULD BE INCREMENTED TO A ONE. 
9. ISSUE STOP 
hhh he ed dhhe oh bbbb 4640460664666 6646 64466606 4466646466466 66466446446 6646464646466648464% 
BGNTST 
Ti6:: 
PNTMAC Ti6ID 
MOV $T16ID,R4 sGET POINTER TO TEST NAME MESSAGE 
JSR PC ,PNTID sPRINT TEST NUMBER AND NAME 
END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 303 3; NO 
MOV @DNI INTE, SPCSRO ; ENABLE INTERRUPTS 
MOVB SINTE!RSET ,@PCSRO ; YES, RESET DELUA 
JSR PC ,CKDNI ; ONI ? 
Bcc 20$ ; YES 
FTL 
JSR PC ,CHKFTL 3; ‘FATL' BIT SET? 
ERRHRD 162. ,ERROO6,MSGOOS ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 162 
-WORD ERROOG 
.WORPD $MSGOOS 
ESCAPE TST ; AND ABORT TEST 
TREP CSESCAPE 
W'RD 1L10046-. 


RN Sa et ne er mene 
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7368 047656 
7369 
7370 047662 


7371 


7372 


7384 


047664 
047664 


004737 
103010 


004737 


104456 
000243 
C23030' 
021736‘ 


012705 012600’ 
004737 032002’ 


030264 ' 


026652 ' 


030212' 
031732' 


030264 ' 


026652’ 


130276 
130270 


208: 


S~ 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


PC ,CLRONI 
30$ 


PC ,CHKFTL 
163. ,ERROO6,MSGOO0S 


TST 


PC ,CLRBUF 

PC ,LODFLT 

PC,LOPCSR 

9DNI INTE, @PCSRO 
@INTE!GETPCB ,@PCSRO 
_—-* 


PC ,CHKFTL 
164. ,ERROO9, MSGO0S 


TST 


PC ,CLRONTI 
50$ 


PC .CHKFTL 
165. ,ERROO6 , MSGO03S 


TST 


; WRITE ONE TO CLEAR ONI 
; ERROR ? 
NO 

; ‘FATL’ BIT SET? 

; YES, REPORT ERROR 
TRAP 
- WORD 
-WORD 
-WORD 

; AND ABORT TEST 
TRAP 
. WORD 


CLEAR XMIT, RECV BUFFERS 





SEQ 224 


CSERHRD 
163 
MSGOO3 


CSESCAPE 
L10046-. 


LOAD DEFAULT PHY.ADDRESS TABLES 


ADORESS OF PCBB -> PCSR2!3 
ENABLE INTERRUPTS 


ISSUE GET_PCBB PORT COMMAND 
a 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
- ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


;WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 


50$: 


MOV 
JSR 


#WTMODE ,RS 
PC ,LOPCBB 


DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 


CSESCAPE 
Li 





-_ = 


ee Se ee amen 
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7398 


7410 


050020 012777 
050026 112777 
050034 004737 
050040 103010 
050042 


050042 004737 


050046 

050046 104456 
050050 000246 
050052 023331' 
050054 021736' 
050056 

050056 104410 
050060 000622 
050062 004737 


050066 103010 
050070 


050070 004737 


050074 

050074 104456 
050076 000247 
050100 023030’ 
050102 021736‘ 


7411 050104 


7412 
7413 
7414 
7415 
7416 
7417 
7418 


7423 


7424 


7425 


7426 


050104 104410 
050106 000574 


050110 012705 
050114 _004737 
0501: 12705 
050124 912700 


050154 103010 
050156 


050156 004737 
050162 
050162 
050164 000252 
050166 023331’ 
050170 021736’ 


050172 
050172 104410 


nee 
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004100 130176 MOV #DNI!INTE,@PCSRO ; ENABLE INTERRUPTS 
000102 130170 NOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
026550' JSR PC ,CHKDNI ; ONI 7 
Bcc 60$ ; YES 
FTL 
026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 166. ,ERRO10,MSGOO03 ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 166 
-WORD ERRO1O 
-WORD MSG003 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10046-. 
: 
030264 ' 60$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
; ERROR ? 
BCC 70$ ; NO 
FTL 
026652 ' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 167. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 167 
-WORD ERROOG 
-WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10046-. 
3 
s;WRITE RING FORMAT (41 TRANSMIT ENTRIES) 
012540’ 70$: MOV @WTRNGS,RS ; DEFAULT WRITE RING FORMAT FUNCTION 
032002' JSR PC ,.LOPCBB ; LOAD FUNCTION -> PCBB 
012720’ MOV xX, ; DEFAULT RING FORMAT 
MOV $6 ,.RO 3; FORMAI = SIX 
032260’ JSR PC ,.LDUDBB ; LOAD RING FORMAT -> UDBB 
004100 i30062 MOV SONI! INTE ,@PCSRO ; ENABLE INTERRUPTS 
000102 130054 MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
026550’ JSR PC ,.CHKDNI ; DNI ? 
Bcc 80$ ; YES 
FTL 
026652‘ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
ERRHRD 170. ,ERRO1LO,MSGOOS3 ; NO, REPORT ERROR 
TRAP CSERHRD 
.WORD 170 
-WORD ERROLO 
.WORD MSGOOS 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
.WORD L10046-. 


7427 


050174 000506 
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TEST 16: NO RECEIVE BUFFER TEST 

7428 050176 004737 030264’ gos: JSR —S- PC, CLRDNI ; WRITE ONE TO CLEAR ONI 

7429 ; ERROR ? 

7430 050202 103010 Bcc sé NO 

2431 050204 FTL 
050204 004737 026652 JSR PC CHKFTL ; 'FATL’ BIT SET? 

2432 050210 ERRHRD 171. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
050210 104456 TRAP  C#ERHRD 
050212 000253 ‘WORD 171 
050214 023030° "WORD ERROOE 
050216 021736! "WORD  MSGO03 

27433 050220 ESCAPE TST ; AND ABORT TEST 
050220 104410 TRAP  CSESCAPE 
050222 000460 L10046-. 

743s ‘WRITE PHYSICAL ADDRESS 

7436 %6 %, e& : 

7437 050224 908: 

7438 050224 012705 000272! MOV —s- @DFAULT,RS , GET DEFAULT PHYSICAL ADDRESS 

7439 050230 004737 032050’ JSR «PC, LDPHYA ; SAVE IN DEFAULT TABLE 

7440 050234 012705 012500' MOVs @WTPHYA, RS ’ DEFAULT WRITE PHYSICAL ADDR FUNC 

7441 050240 004737 032002! JSR —s- PC, LDP ; LOAD FUNCTION -> PCBB 

7442 050244 012777 004100 127752 MOV —«s@DNI! INTE, @PCSRO ; ENABLE INTERRUPTS 

7443 050252 112777 000102 127744 MOVB = @INTE!GETCMD.@PCSRO —«;_: ISSUE GET_CMD PORT COMMAND 

7444 050260 004737 026550° JSR «PC, CHKONT ; DNI ? 

7445 050264 103010 BCC 40 s«008 ; YES 

7446 050266 FTL 
050266 004737 026652° JSR PC, CHKF TL ; ‘FATL’ BIT SET? 

7447 050272 ERRHRD 172. .ERROLO,MSGOO3 ; NO, REPORT ERROR 
050272 104456 TRAP CSERHRD 
050274 000254 ‘WORD 172 
050276 023331’ "WORD ERROIO 
050300 021736’ "WORD  MSGOO3 

7448 050302 ESCAPE TST ; AND ABORT TEST 
050302 104410 TRAP  CSESCAPE 

nang (30304 000376 “WORD L10046-. 

7450 050306 004737 030264' 100$: JSR «PC. CLRONI ; WRITE ONE TO CLEAR DNI 

7451 ; ERROR ? 

7452 050312 103010 BCC «1108 ; NO 

7453 050314 FTL 
050314 004737 026652: JSR —s- PC, CHKFTL ; ‘FATL' BIT SET? 

7454 050320 ERRHRD 173. ,ERROO6,MSGOO3 ; YES, REPORT ERROR 
050320 104456 TRAP  CSERHRD 
050322 000255 ‘WORD 173 
050324 023030° "WORD  ERROOG 
050326 021736’ "WORD  MSGOO3 

7455 050330 ESCAPE TST ; AND ABORT TEST , 
050330 104410 TRAP —«CSESCAPE 

ae 050882 000350 "WORD - L10046-. 
74 ; 
7457 ‘SET UP RINGS FOR 50. TRANSMIT PACKETS 
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La ;AND NO RECEIVE BUFFERS OWNED BY DELUA 
7460 050334 012705 014740' 110$: MOV @#TORBXX,RS :; TRANSMIT RING 
7461 3 004737 032222' JSR PC ,LDTORX ; LOAD TORBX 
7462 050344 012705 013010’ MOV @RDRB1B,RS ; DEFAULT RECEIVE RING (NO BUFFERS) 
bis 6 050350 004737 032126' JSR PC ,LDRDORX ; LOAD RORX 
: 
oo ;SET UP BUFFERS AND START 
7467 050354 005037 016562' CLR DOCRC s NO CRC 
7468 050360 012737 000006 016560' MOV #6 ,BYTCNT ; BYTES/PACKET 
7469 050366 004737 033006‘ JSR PC ,SETBUF ; SET UP BUFFERS 
7470 050372 012777 004100 127624 MOV #ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 
747, 950400 112777 000104 127616 MOVB #INTE! START, @PCSRO ; ISSUE START PORT COMMAND 
7472 50406 004737 026550‘ JSR PC, CHKONI ; ONI? 
7473 050412 103010 BCC 130$ ; YES 
7474 050414 FTL 
050414 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7475 050420 ERRHRD 174. ,ERRO12,MSGO03 ; NO, REPORT ERROR 
050420 104456 TRAP CSERHRD 
050422 000256 -WORD 174 
050424 023447' -WORD ERROI2 
050426 021736’ -WORD MSGOO3 
7476 050430 ESCAPE TST ; AND ABORT TEST 
050430 104410 TRAP CSESCAPE 
an 050432 000250 -WORD 1L10046-. 
; 
La :Don't use subroutine CLRONI until check PCSRO upper byte stetus 
7480 sWAIT FOR RCBI SET IN PCSRO 
7481 ; 
7482 050434 130$: 
7483 050434 004737 027102’ JSR PC ,CHKRCE ; BUFFER AVAIL ERROR? 
7484 050440 103016 BCC 180$ ; YES, SKIP ERROR PRINTOUT 
7485 050442 013737 000236' 016514’ MOV PCSROC ,EPCSRO ; SET UP DATA FOR 
7486 050450 017737 127552 016516‘ MOV @PCSR1 .EPCSR1i 3 ERROR PRINTOUT 
7487 050456 FTL 
050456 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7488 050462 ERRHRD 175. ,ERRO25,MSGOO3 ; NO, REPORT ERROR 
104456 TRAP CSERHRD 
050464 000257 -WORD 175 
050466 024506’ -WORD ERROZS 
050470 021736’ -WORD MSGOO3 
7489 050472 ESCAPE TST ; AND ABORT TEST 
050472 104410 TRAP CSESCAPE 
050474 000206 -WORD L10046-. 
7490 ; 
La sNow can clear PCSRO upper byte 
7493 050476 004737 030346’ 180$: JSR PC, ,CLINTR ; WRITE ONE'S TO CLEAR UPPER BYTE 
7494 050502 017700 127516 MOV @PCSRO ,RO ; READ UPPER BYTE 
7495 050506 032700 175400 BIT #CLINTB,RO ; ANY INTERRUPT BITS STILL SET? 
7496 050512 001416 BEG 230% ; IF NO ERROR, SKIP ERROR REPORT 
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7497 050514 
7498 050522 
7499 050530 


017737 127504 016514' 
017737 127500 016516‘ 


004737 026652‘ 


? 

2308: 
004100 127446 
000117 127440 
026550' 


012777 
112777 
004737 
103010 


004737 026652’ 


104456 
000310 
024126’ 
021736’ 


104410 
000072 


004737 
103010 


> 
030264 ' 2405: 


004737 926652’ 


021736’ 
104410 
000044 


2505: 


064737 039346’ 


104432 
000034 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


JSR 
EXIT 


@PCSRO,EPCSRO 
@PCSR1,EPCSR1 


PC ,.CHKFTL 
176. ,ERRO45,MSGO03 


TST 


@DONI! INTE, @PCSRO 
@INTE!STOP ,@PCSRO 
PC ,CHKDNI 


2403 


PC ,CHKFTL 
200. ,ERRO19, MSGOO3 


PC, CHKFTL 
201. ,ERROOG . MSGOOS 


TST 


PC ,CLINTR 
TST 


;LOCAL TEST MESSAGE 


SAVE PCSRO AND 
PCSR1i FOR ERROR REPORT 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
.WORD 
. WORD 
* WORD 

AND ABORT TEST 
TRAP 
-WORD 


ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 
ONI ? 

YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR ? 


‘FATL' BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


INSURE DELUA INTR BITS CLEAR 


TRAP 
. WORD 





SEQ 228 


CSESCAPE 
L10046-. 


CSERHRD 
200 


ERRO19 
MSGO03 


CSESCAPE 
L10046-. 


CSESCAPE 
L10046-. 


CSEXIT 
L10046-. 





ek CN 


HARDWARF TESTS MACRO YOS.02 Friday 12-Jul-85 09:33 Page 107-6 
TEST 16: NO RECEIVE BUFFER TEST 


7525 
7526 050650 104 105 a T1i6ID: .ASCIZ ‘DELUA NO RECEIVE BUFFER ' 


7527 
7528 -EVEN 
7529 
7530 050702 ENDTST 
0507 L10046: 


02 
050702 104401 


TRAP 






CSETST 








——— nanan 
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TEST 17: DISABLE RECEIVE CHAINING TEST 
ae .SBTTL TEST 17: DISABLE RECEIVE CHAINING TEST 
7534 sRRRERAEEARREREERAAEEEREREEEREREEEEREEEEEEEEAEEEEEEEEEEE EEE DEED EERE EE EEE 
7535 
7536 ; THIS TEST VERIFIES DISABLE DATA CHAINING MODE. 
7537 ; AN INTERNAL LOOPBACK IS PERFORMED WITH RECEIVE BUFFERS CHAINED 
7538 : WHILE IN DISABLE DATA CHAINING MODE. 
Le : A NCHN ERROR IS EXPECTED IN THE RECEIVE DESCRIPTOR RING. 
; 
7541 ; TEST SEQUENCE: 
7542 : 1. WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM, 
7543 : and DISABLE DATA CHAINING MODE 
7544 : 2. WRITE RING FORMAT 
7545 : 3. WRITE PHYSICAL ADDRESS 
7546 : 4. SET UP RINGS AND BUFFERS FOR RECEIVE DATA CHAINING 
7547 : 5. ISSUE START 
7548 : 6. CHECK FOR NCHN ERROR IN RDORB+6 
Li ma : 7. ISSUE STOP 
3 
7551 SERREAREREAEREEAAEERASERAEEEES EERE EE EEEEEE EE EE ELE EE ED EDS E446 64464646646 
7552 
7553 050704 BGNTST 
050704 T17:: 
7554 x 
7555 050704 PNTMAC T1i7IO 
050704 012704 052260' MOV #T17ID .R4 sGET POINTER TO TEST NAME MESSAGE 
050710 004737 032734' JSR »PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
7556 050714 004737 033434’ JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
7557 050720 103034 BCC 30$ s NO 
7558 050722 012777 004100 127274 MOV @ONI! INTE, @PCSRO ; PRECONDITION INTR EN. 
7559 050730 112777 000140 127266 MOVB #INTE!RSET ,@PCSRO ; YES, RESET DELUA 
7560 050736 004737 027736' JSR ° ; ONI ? 
7561 050742 103010 BCC 20% ; YES 
7562 050744 FTL 
050744 004737 026652’ JSR PC ,CHKFTL 3; ‘FATL’ BIT SET? 
7563 050750 ERRHRD 202. ,.ERRO06,.MSGOOS ; NO, REPORT ERROR 
0507 104456 TRAP CSERHRD 
050752 000312 -WORD 202 
050754 023030’ -WORD ERROOS 
0507 021736‘ -WORD MSGOOS 
7564 050760 ESCAPE TST ; AND ABORT TEST 
050760 104410 TRAP CSESCAPE 
050762 001336 -WORD 1L110047-. 
$ 
7366 050764 004737 030264’ 20$: JSR PC ,CLRONI ; aes S ONE TO CLEAR ONI 
; 
7568 050770 103010 BCC 30$ ; NO 
7569 050772 FTL 
050772 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
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en 


7570 050776 
050 


7583 051064 


7584 
75#5 051070 
7586 
7587 051074 
7588 051076 


7589 051102 


7594 

7595 051116 
7596 051122 
7597 051126 
7598 051134 
7599 051142 
7600 051150 
7601 051154 
7602 051156 


030212' 


030264 ' 


026652' 


127170 
127162 


000302’ 
127062 
127054 


SEQ 231 
ERRHRD 203. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 203 
-WORD ERROOG 
-WORD MSGO03 
ESCAPE TST ; AND ABORT TEST 
TP AP CSESCAPE 
«WORD 110047-. 
$ 
30$: 
JSR PC ,CLRBUF ; CLEAR XMIT,RECV BUFFERS 
JSR PC ,LDDFLT ; LOAD DEFAULT PHY. ADDRESS TABLES 
JSR PC ,LOPCSR ; ADDRESS OF PCBB -> PCSR2!3 
MOV #ONI! INTE, 8@PCSRO 
MOVB #INTE!GETPCB ,@PCSRO ; ISSUE GET_PCBB PORT COMMAND 
JSR PC ,CHKONI ; ONI? 
BCC 40$ ; YES 
FTL 
JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 204. ,ERROO9,MSGOO03 ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 204 
-WORD ERROOS 
-WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10047-. 
3 
40$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
; ERROR 7 
BCC 50$ 5 
FIL 
JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
ERRHRD 205. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 205 
-WORD ERROOG 
-WORD MSGOOS 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10047-. 
; 
s;WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM AND 
; DISABLE RECEIVE DATA CHAINING MODE 
50$: MOV @WUTMODE ,RS ; DEFAULT WRITE MODE FUNCTION 
JSR PC ,.LDOPCB ; LOAD FUNCTION -> PCBB 
MOV MODE17 ,PCBB+2 ; LOAD MODE REGISTER 
MOV @ONI! INTE, @PCSRO 
MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
JSR PC ,CHKDNI ; ONI ? 
BCC 60$ ; YES 
FTL 
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TEST 17: DISABLE RECEIVE CHAINING TEST 
051156 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7603 051162 ERRHRD 206. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
051162 104456 TRAP CSERHRD 
051164 000316 -WORD 206 
051166 023331‘ «WORD ERRO1O 
051170 021736’ -WORD MSGOO03 
7604 051172 ESCAPE TST ; AND ABORT TEST 
051172 104410 TRAP CSESCAPE 
051174 001124 -WORD 1L10047-. 
; 
7606 051176 004737 030264' 60$: JSR PC ,CLRONI ; caine 1. TO CLEAR DNI 
| 
7608 051202 103010 BCC 70$ ; NO 
7609 051204 FTL 
051204 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7610 051210 ERRHRD 207. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
051210 104456 TRAP CSEPHRD 
i2 000317 -WORD 207 
051214 023030' -WORD ERROOG 
051216 021736’ -WORD MSGOO03 
7611 05-220 ESCAPE TST ; AND ABORT TEST 
0512 104410 TRAP cs 
001076 -WORD 1L110047- 
7612 : 
oe ;sWRITE RING FORMAT 
7615 051224 012705 012540’ 70$: MOV @WTRNGS,RS ; DEFAULT WRITE RING FORMAT FUNCTION 
7616 051230 004737 032002’ JSR PC ,.LOPCBB ; LOAD FUNCTION -> PCBB 
7617 051234 012705 012704’ MOV @RERMT RS 3; DEFAULT RING FORMAT 
7618 051240 012700 MOV 06 ,RO ; FORMAT = SIX WORDS 
7619 051244 004737 032260' JSR PC ,LDUDBB ; LOAD RING FORMAT -> UDBB 
7620 051250 012777 004100 126746 MOV @ONI INTE, SPCSRO 
7621 051256 112777 000102 126740 MOVB @INTE!GETCMD .@PCSRO ; ISSVE GET_CMD PORT COMMAND 
7622 051264 004737 026550‘ JSR PC ,CHKDNI 3; ONI ? 
7623 051270 103010 BCC 80$ ; YES 
7624 051272 FTL 
051272 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7625 051276 ERRHRD 210. ,ERRO1O,MSGOOS ; NO, REPORT ERROR 
051276 104456 TRAP CSERHRD 
051300 000322 -WORD 210 
051302 023331’ -WORD ERROIO 
051 021736’ -WORD MSGOOS 
7626 051306 ESCAPE TST ; AND ABORT TEST 
051 104410 TRAP CSESCAPE 
—_ 051310 001010 -WORD L10047- 
3 
7628 051312 004737 030264’ 80$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
7629 ; ERROR ? 
7630 051316 103010 BCC 90$ ; NO 
7631 051320 FTL 
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SEQ 233 


051320 004737 026652° JSR PC. CHKFTL ; ‘FATL’ BIT SET? 
7632 051324 ERRHRD 211. ,ERRO06,MSGO03 , YES, REPORT ERROR 
051324 104456 TRAP  CSERHRD 
051326 000323 ‘WORD 211 
051330 023030’ "WORD  ERROOE 
051332 021736! "WORD  M5G003 
7633 051334 ESCAPE TST ; AND ABORT TEST 
051334 104410 TRAP  CSESCAPE | 
nega S138 000762 ‘WORD 10047-. 
? 
7635 ‘WRITE PHYSICAL ADDRESS 
7637 051340 908: 
7638 051340 012705 000272' MOV Ss @DFAULT.RS ; GET DEFAULT PHYSICAL ADDRESS 
2639 051344 004737 032050’ JSR «PC, LDPHYA ; SAVE IT IN DEFAULT TABLE 
2640 051350 012705 012500’ | MOV —s @WTPHYA, RS ) DEFAULT WRITE PHYSICAL ADDR FUNC 
7641 051354 004737 032002" JSR —«- PC, LDPCBB ; LOAD FUNCTION -> PCBS 
7642 051360 012777 004100 126636 MOV —s-@DNIF INTE, @PCSRO 
7643 051366 112777 000102 126630 MOVB  @INTE!GETCMD,8PCSRO —=S_,,_: ISSUE GET_CMD PORT COMMAND 
7644 051374 004737 026550° JSR «PC, CHKDNI ; ONI ? 
2645 051400 103010 Bcc 40 s«é1008 ; YES 
7646 051402 FTL 
051402 004737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
7647 051406 ERRHRD 212. ,ERROLO,MSGOO3 ; NO, REPORT ERROR 
051406 104456 TRAP  CSERHRD 
051410 000324 WORD 212 
051412 023331! "WORD  ERRO10 
051414 021736: "WORD 
7648 051416 ESCAPE TST ; AND ABORT TEST 
051416 104410 TRAP  CSESCAPE 
gag 3182? 000700 "WORD L10047-. 
‘ 3 
7650 051422 004737 030264: 1008: JSR —S«- PC, CLRONT ; WRITE ONE TO CLEAR ONI 
7654 3; ERROR 7? 
7652 051426 103010 Bcc «1108 ; NO 
7653 051430 FTL 
051430 004737 026652° JSR —s- PC, CHKF TL ; ‘FATL’ BIT SET? 
7654 051434 ERRHRD 213. ,ERROO6,MSGOO3 ; YES, REPORT ERROR 
051434 104456 TRAP  CSERHRD 
051436 000325 ‘WORD 213 
051440 023030" "WORD  ERROOE 
051442 021736’ “WORD -MSGOO3 
7655 051444 ESCAPE TST ; AND ABORT TEST 
051444 104410 TRAP — CSESCAPE 
nese OMe 000652 ‘WORD L10047-. 
3 
7657 ‘SET UP RINGS FOR LOOPBACK 
7659 051450 012705 014410: 1108: MOV _—s@TDRBIA,RS , DEFAULT ONE BUFFER TRANSMIT RING 
7660 051454 004737 032164: JSR —«- PC LOTORB ; LOAD TORB 
7661 051460 012705 013050 HOV —«s- @RDRBZA, RS ’ DEFAULT CHAINED RECEIVE RING 
7662 051464 004737 032070: JSR «PC, LDRORB ; LOAD RORB 





— 
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7688 051620 


7689 
7690 051624 
7691 
7692 051630 


103010 


004737 


104456 
000327 
023030° 
021736' 


104410 
000524 


004737 
103010 
004737 


104456 
000330 
023530° 
021736‘ 


104410 
000476 


004737 
103010 


016562‘ 


030264 ' 


026652 ' 


027566 ' 


026652‘ 


030500' 


Frida 


016560° 


126510 
126502 





SS, 
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i 
;SET UP BUFFERS AND START 


120$: 


130$: 


140$: 


JSR 
ERRHRD 


ESCAPE 


DOCRC 

#6 ,BYTCNT 

PC ,SETBUF 

@ONI! INTE, @PCSRO 
@INTE!START, @PCSRO 
PC ,CHKONI 

120$ 

PC ,CHKFTL 


214. ,ERRO12,MSGO003 


TST 


PC ,CLRONI 


130$ 


PC .CHKFTL 
215. ,ERROO6, MSGO03S 


TST 


PC .CHKTXI 
140$ 


PC .CHKFTL 
216. ,ERRO13,MSGO03 


TST 


PC ,CLRTXI 
150$ 


NO CRC 

BYTES/PACKET 

SET UP BUFFERS’ 

ISSUE START PORT COMMAND 
DNI? 


YES 


‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
. WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR DNI 
— ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
TXI ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR TxI 
— ? 
N 





SEQ 234 


CSERHRD 


CSESCAPE 
L10047-. 


CSESCAPE 
L10047-. 


CSESCAPE 
L10047-. 





—_— ans henna eee nee 
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TEST 17: DISABLE RECEIVE CHAINING TEST 

7693 051632 FTL 
051632 004737 026652° JSR PC, CHKFTL ; ‘FATL’ BIT SET? 

7694 051636 ERRHRD 217. ,€RRO14,MSGO03 ; YES, REPORT ERROR 
051636 104456 TRAP § CSERHRO 
051640 000331 .WORD 217 
051642 023561' "WORD FRROI4 
051644 021736° "WORD MSGOO3 

7695 051646 ESCAPE TST ; AND ABORT TEST 
051646 104410 TRAP  CSESCAPE 

ae 051650 000450 WORD 10047-. 

7697 051652 012705 000620: i50$: MOV #TORB,RS ; CHECK TDRB OWNERSHIP 

7698 051656 004737 027024° JSR PC, CHKOWN ; OWN = PORT DRIVER ? 

7699 051662 103010 BCC 160$ ; YES 

7700 051664 FTL 
051664 004737 026652: JSR PC .CHKFTL ; ‘FATL‘ BIT SET? 

7701 051670 ERRHRD 220.,ERRO18 ; NO, REPORT ERROR 
051670 104456 TRAP § CSERHRD 
051672 000334 .WORD 220 
051674 024026: "WORD ERROIS 
01676 000000 “WOR? 0 

7702 051700 ESCAPE TST ; AND ABORT TEST 
051700 104410 TRAP - CSESCAPE 

wins 051702 000416 _WORD 110047-. 

ff 

7704 051704 012705 016264' 160$: MOV @TDR14A,R5 ; POINT TO EXPECTED TORB 

7705 051710 004737 032370° JSR PC ,LDXTOR ; LOAD INTO XTORBO TABLE 

7706 051714 012705 000620' MOV 8TDRB,RS ; CHECK TORB 

7707 051720 004737 027500' JSR PC ,CHKTDR ; ERRORS ? 

7708 051724 103010 Bcc 170$ ; NO 

7709 051726 FTL 
051726 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

7710 051732 ERRHRD 221..£RRO20,MSGOOS ; YES, REPORT ERROR 
051732 104456 TRAP §_ CSERHRD 
051734 900335 _WORD 221 
051736 024296: "WORD ERRO2O 
051740 022042° "WORD MSGOO5 

7711 051742 ESCAPE TST ; AND ABORT TEST 
051742 104410 TRAP  CSESCAPE 

: 051744 000354 _WORD 110047-. 

7712 ; 

7713 051746 004737 027316’ 170s: JSR PC ,CHKRXI ; RXI ? 

7714 051752 103010 BCC 1808 ; YES 

7715 051754 FTL 
051754 004737 026652’ JSR PC, CHKFTL ; ‘FATL' BIT SET? 

7716 051760 ERRHRD 222. ,ERRO1S,MSGO03 ; NO, REPORT ERROR 
051760 104456 TRAP - CSERHRD 
051762 000336 WORD 222 
051764 023627' "WORD €RROIS 
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7742 


7743 


051766 
051770 
051770 
051772 


052000 
052002 


052002 
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021736 


104410 
000326 


004737 
103010 


004737 


004737 


194456 
000340 


024753' 
000000 


104410 
000246 


012705 
004737 
012705 
004737 
103010 


030432’ 


026652 ' 


000660' 
027024' 


026652‘ 


016414’ 
032340' 
000660‘ 


027206’ 


026652’ 





eS ES SS LT 
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3 
180$: 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


TST 


PC ,CLRRXI 
190$ 


PC ,CHKFTL 
223. ,ERRO16,MSGO03 


TST 


;CHECK FIRST RING ENTRY 


190$: 


$ 
200$: 


JSR 


ERRHRD 225. ,ERRO36,MSG006 


@RORB,RS 
PC ,CHKOWN 
200$ 


PC .CHKFTL 
224. ,ERROSO 


TST 


@ROR17A,RS 
PC ,LDXROR 


#RORB RS 
PC ,CHKROR 
210% 


PC ,CHKFTL 


ESCAPE TST 


TRAP 
. WORD 


WRITE ONE TO CLEAR RXI 
ERROR ? 


AND ABORT TEST 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
CHECK RORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
POINT TO EXPECTED RDRB 
LOAD INTO XRORBO TABLE 
CHECK RORB 
ERRORS ? 
NO 
‘"FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 





SEQ 236 


MSGO003 


CSESCAPE 
L10047-. 


CSERHRD 
223 
ERRO16 
MSGO03 


CSESCAPE 
L10047-. 


CSESCAPE 
L10047-. 


a 
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7744 

7745 

7746 052116 
7747 OS2i22 
7748 052126 
7749 052132 
7750 052136 
7751 052140 


7752 052144 


7760 052206 


012777 
112777 
004737 
103010 


004737 


104456 
000346 
023030' 
021736‘ 


104410 
000052 


004737 


104432 


016424 ' 
032340' 
000670' 
027206‘ 


026652' 


004100 
000117 
026550‘ 


026652' 


030264’ 


026652’ 


030346 ' 
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;CHECK SECOND RING ENTRY 


2108: 


; 
126036 230%: 
126030 


H 
240$: 


2505: 


@ROR176,R5 

PC ,LOXRDR 
#RORB+8. ,R5S 

PC ,CHKRDR 

230$ 

PC ,CHKFTL 

226. ,ERRO37,MSGO006 


TST 


#ONI ! INTE, @PCSRO 
GINTE! STOP ,@PCSRO 
PC ,.CHKONI 

2403 


PC ,CHKFTL 
227. ,ERRO19,MSGOOS 


TST 


PC ,CLRONI 
250% 


PC ,CHKFTL 
230. ,ERROOG ,MSGO0S 


TST 


PC ,CLINTR 
TST 


POINT TO EXPECTED RDORB 
LOAD INTO XRORBO TABLE 
CHECK RORB 

ERRORS 7? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
-WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
ISSUE STOP PORT COMMAND 
DNI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR ONI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


INSURE DELUA INTR BITS CLEAR 


TRAP 





SEQ 237 


CSERHRD 
230 


ERROO6 
MSGOO3 
CSESCAPE 
L10047-. 


CSEXIT 





ES SS TT 
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TEST 17: DISABLE RECEIVE CHAINING TEST 
— 052256 000042 -WORD 1L10047-. 
7774 ;LOCAL TEST MESSAGE 
7775 


7776 052260 104 105 114 T1i7ID:.ASCIZ ‘DELUA DISABLE RECEIVE CHAINING ' 
052263 125 101 040 


7777 .EVEN 
7778 
7779 052320 ENDTST 
L10047: 


320 
052320 104401 


TRAP CSETST 








(ee ee a EE NS Re rnencncnnal 
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TEST 18: TRANSMIT CHAINING ERROR T 
7784 .SBTTL TEST 18: TRANSMIT CHAINING ERROR TEST 
82 
7783 FRRRAAAAAASAREAASAERAEARAAREREEEREAEEEEEAEAAAEREREAEEAEEEREBESEEEEEREED EES 
7784 3 
7785 ; THIS TEST VERIFIES THAT A TRANSMIT BUFL ERROR CAN BE GENERATED. 
7786 ; AN INTERNAL LOOPBACK IS ATTEMPTED WITH TRANSMIT BUFFERS CHAINED 
7787 ; AND SUCCESSIVE OWNED RINGS HAVING STP SET. 
Ub. : A BUFL ERROR IS EXPECTED IN THE TRANSMIT DESCRIPTOR RING. 
t 
7790 ; TEST SEQUENCE: 
7791 ; 1. WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
7792 ; 2. WRITE RING FORMAT 
7793 : 3, WRITE PHYSICAL ADDRESS 
7794 ; 4. SET UP PINGS AND BUFFERS 
7795 : TRANSMIT RING = CHAINED WITH SUCCESSIVE STPs 
7796 ; 5. ISSUE START 
7797 : 6. CHECK FOR BUFL ERROR IN TORB+6 
77 ; 7. ISSUE STOP 
7800 : eeRRSEKREKEOEES EOE OS OKKEEEEEEEOS 00464 66646466466666464664664646464646646464664446446464 
7801 
7802 052322 BGNTST 
US2322 T18:: 
7803 
7804 052322 PNTMAC T1i8ID 
052322 012704 053552: MOV #T18ID,R4 ;GET POINTER TO TEST NAME HESSAGE 
052326 004737 032734: JSR PC .PNTID sPRINT TEST NUMBER AND NAME 
| ; END OF MACRO EXPANSION OF ‘PNTMAC’ 
7805 052332 004737 033434‘ JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
7806 052336 103034 BCC 30$ ; NO 
7807 052340 012777 004100 125656 MOV #ONI ! INTE, SPCSRO ; PRECONDITION INTR EN. 
7808 052346 112777 000140 125650 MOVB @INTE! RSET, @PCSRO ; YES, RESET DELUA 
7809 052354 004737 027736’ JSR .CKDNI ; ONI ? 
7810 052360 103010 BCC 20$ ; YES 
7811 052362 FTL 
052362 004737 026652' JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7812 052366 ERRHRD 231. .ERROO6,MSGOO3 ; NO, REPOKT ERROR 
052366 104456 TRAP CSERHRD 
052370 000347 .WORD 231 
052372 023030' -.WORD ERROOS 
052374 021736’ -.WORD MSGOC3 
7813 052376 ESCAPE TST ; AND ABORT TEST 
052376 104410 TRAP CSESCAPE 
ses 052400 001212 .WORD 1£10050-. 
+ 
7815 052402 004737 030264’ 20: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
7816 ; ERROR ? 
7817 052406 103010 BCC 30$ ; NO 
7818 052410 FTL 
052410 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 





















——— aaa 





ee 
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TEST 18: TRANSMIT CHAINING ERROR T 
7819 052414 ERRHRD 232. ,ERRO06,MSGO003 ; YES, REPORT ERROR 
052414 104456 TRAP CSERHRD 
052416 000350 . WORD 2 
052420 023030' WORD ERROOG 
052422 021736‘ WORD MSG003 
7820 05<424 ESCAPE TST ; AND ABORT TEST 
052424 104410 . TRAP CSESCAPE 
052426 001164 -WORD 1L10050-. 
7821 $ 
7822 052430 30$: 
7823 052430 004737 030212' JSR PC ,CLRBUF ; CLEAR XMIT,RECV BUFFERS 
7824 052434 004737 031732' JSR PC ,LODFLT ; LOAD DEFAULT PHY .ADDRESS TABLES 
7825 052440 004737 032032' JSR PC ,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 
7826 052444 012777 004100 125552 MOV #DNI! INTE, @PCSRC ; ENABLE INTERRUPTS 
7827 052452 112777 000101 125544 MOVB #INTE!GETPCB ,@PCSRO ; ISSUE GET_PCBB PORT COMMAND 
7828 052460 004737 026550’ JSR PC ,CHKONI ; ONI? 
7829 052464 103010 BCC 40$ ; YES 
7830 052466 FTL 
052466 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7831 052472 ERRHRD 233. ,ERRO09,MSGO03 ; NO, REPORT ERROR 
052472 104456 TRAP CSERHRD 
052474 000351 4 3 
052476 023245‘ -WORD ERROOS 
052500 021736‘ MSGOO3 
7832 052502 ESCAPE TST ; AND ABORT TEST 
052502 104410 TRAP CSESCAPE 
one 052504 001106 -WORD 1L10050-. 
; 
7834 052506 004737 030264’ 40$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
7835 ; ERROR 7? 
7836 052512 103010 BCC 50$ ; NO 
7837 052514 FTL 
052514 004737 026652’ JSR PC .CHKFTL 3 ‘FATL’ BIT SET? 
7838 052520 ERRHRD 234. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
052520 104456 TRAP CSERHRD 
052522 000352 .WORD 
052524 023030' -WORD ERROOG 
052526 021736’ MSGOO03 
7839 052530 ESCAPE TST ; AND ABORT TEST 
052530 104410 TRAP CSESCAPE 
et 052532 001060 WORD 1L10050 
; 
La ns sWRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
2 
7843 052534 012705 012600’ 50$: MOV #WTMODE RS ; DEFAULT WRITE MODE FUNCTION 
7844 052540 004737 032002’ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
7845 052544 012777 004100 125452 MOV #DONI! INTE, @PCSRO ; ENABLE INTERRUPTS 
7846 052552 112777 000102 125444 MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
7847 052560 004737 026550’ JSR PC ,CHKDNI ; ONI ? 
7848 052564 103010 BCC 60$ ; YES 
7849 052566 FTL 
052566 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 








ne SL 
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TEST 18: TRANSMIT CHAINING ERROR TEST 
7850 052572 ERRHRD 235. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
052572 104456 TRAP CSERHRD 
052574 000353 “WORD 235 
052576 023331' «WORD ERRO1IO 
052600 021736’ -WORD MSGOO3 
7851 052602 ESCAPE TST ; AND ABORT TEST 
052602 104410 TRAP CSESCAPE 
— 052604 001006 -WORD 1£10050-. 
; 
7853 052606 004737 030264’ 60$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
7854 ; ERROR 7? 
7855 052612 103010 BCC 70$ NO 
7856 052614 FTL 
052614 004737 026652’ JSR PC ,CHKFTL ; 'FATL’ BIT SET? 
7857 052620 ERRHRD 236. ,ERROO6,MSGOO0S ; YES, REPORT ERROR 
052620 104456 TRAP CSERHRD 
052622 000354 -WORD 236 
052624 023030’ -WORD ERROOG 
052626 021736' -WORD MSGOOS 
7858 052630 ESCAPE TST ; AND ABORT TEST 
052630 104410 TRAP CSESCAPE 
sane 052632 000760 -WORD L10050-. 
; 
7860 ;WRITE RING FORMAT 
7861 052634 012705 012540' 70$: MOV @WTRNGS RS ; DEFAULT WRITE RING FORMAT FUNCTION 
7862 052640 004737 032002’ JSR PC ,.LOPCBB ; LOAD FUNCTION -> PCBB 
7863 052644 012705 012704' MOV ORFRMT RS ; DEFAULT RING FORMAT 
7864 052650 012700 MOV 96 ,RO ; FORMAT = SIX WORDS 
7865 052654 004737 032260 JSR PC ,LDUDBB ; LOAD RING FORMAT -> UDBB 
7866 052660 012777 004100 125336 MOV @ONI! INTE, @PCSRO i INTERRUPTS 
7867 052666 112777 000102 125330 MOVB @INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
7868 052674 004737 026550’ JSR PC ,CHKDNI ; ONI ? 
7869 052700 103010 BCC 80$ ; YES 
7870 052702 FTL 
052702 004737 026652’ JSR PC ,CHKFTL 3; ‘FATL’' BIT SET? 
7871 052706 ERRHRD 237. ,ERRO10,MSGOOS ; NO, REPORT ERROR 
052706 104456 TRAP CSERHRD 
052710 000355 -WORD 237 
052712 023331' -WORD ERRO1O 
052714 021736' -WORD MSGOOS 
7872 052716 ESCAPE TST ; AND ABORT TEST 
052716 104410 TRAP CSESCAPE 
" 052720 000672 -WORD 1L10050-. 
i 
7874 052722 004737 030264’ 80$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
7875 ; ERROR ? 
7876 052726 103010 BCC 90$ ; 
7877 052730 FTL 
052730 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7878 052734 ERRHRD 240. ,ERROO6,MSGO0S ; YES, REPORT ERROR 
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TEST 18: TRANSMIT CHAINING ERROR TEST 


012705 
004737 
012705 
004737 


005037 


030264 ' 


026652 ' 


014550' 


032070' 


016562’ 


; 
100$: 


; 
;SET UP 


110$: 


; 
;SET UP 


ESCAPE 


BUFFERS 
CLR 


TST 


; 
;WRITE PHYSICAL ADDRESS 


#DFAULT,RS 


#ONI! INTE, @PCSRO 
#INTE!GETCMD , @PCSRO 
PC ,CHKONI 

100$ 

PC ,CHKFTL 


241. ,ERRO10, MSGOO0S 


TST 


PC ,CLRONI 
110$ 


PC ,CHKFTL 
242. ,ERROO6 , MSGOOS 


TST 


#TORBIE,RS 
PC .LOTORB 
#RORB1A,RS 
PC ,LDRORB 


AND START 
DOCRC 


as 


; NO CRC 


AND ABORT TEST 


GET DEFAULT as te 


SAVE IT IN DEFAULT T 





SEQ 242 


CSERHRD 
240 
ERROO6 


CSESCAPE 
L10050-. 


DEFAULT WRITE PHYSICAL ADDR FUNC 


LOAD FUNCTION -> PCBB 
ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 
DNI ? 

YES 

‘FATL’ BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR ONI 
ERROR ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


DEFAULT ERROR TRANSMIT RING 
LOAD T 


CSESCAPE 
L10050-. 


DRB 
DEFAULT ONE BUFFER RECEIVE RING 


LOAD RORB 
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TEST 18: TRANSMIT CHAINING ERROR TEST 





SEQ 243 


7912 053104 012737 000006 016560‘ MOV #6 ,BYTCNT ; BYTES/PACKET 
7913 053112 004737 033006’ JSR PC ,SETBUF ; SET UP semare 
7914 053116 012777 004100 125100 MOV #ONI! INTE, 8PCSRO ; ENABLE INTERRUPTS 
7915 053124 112777 000104 125072 MOVB @INTE!START, @PCSRO ; ISSUE START PORT COMMAND 
7916 053132 004737 026550’ JSR PC ,CHKDNI ; DONI? 
7917 053136 103010 BCC 120% ; YES 
7918 053140 FTL 
053140 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7919 053144 ERRHRD 243. ,ERRO12,MSGO003 ; NO, REPORT ERROR 
053144 104456 TRAP CSERHRD 
053146 000363 . WORD 43 
053150 023447' -WORD ERROI2 
053152 021736‘ -WORD MSGOOS 
7920 053154 ESCAPE TST ; AND ABORT TEST 
053154 104410 TRAP CSESCAPE 
naee 053156 000434 -WORD L10050- 
7922 053160 004737 030264’ 120$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
7923 ; ERROR 7? 
7924 053164 103010 BCC 130$ s NO 
7925 053166 FTL 
053166 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
7926 053172 ERRHRD 245. ,ERROO6, MSGOOS ; YES, REPORT ERROR 
053172 104456 TRAP CSERHRD 
053174 000365 -WORD 245 
053176 023030’ -WORD ERROOG 
053200 021736' -WORD MSGOOS 
7927 053202 ESCAPE TST ; AND ABORT TEST 
053202 104410 TRAP CSESCAPE 
ve 053204 000406 -WORD L10050-. 
i 
7929 053206 004737 027566’ 130$: JSR PC ,CHKTXI ; ™XI ? 
7930 0532 103010 BCC 140% ; YES 
7931 053214 FTL 
053214 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7932 053220 ERRHRD 246. ,ERRO13,MSGO0S ; NO, REPORT ERROR 
053220 104456 TRAP CSERHRD 
3222 000366 -WORD 246 
053224 023530’ -WORD ERROIS 
053226 021736' -WORD MSGOOS 
7933 053230 ESCAPE TST ; AND ABORT TEST 
053230 104410 TRAP CSESCAPE 
ome 053232 079360 -WORD 1L10050-. 
: 
7935 053234 004737 030500’ 140$: JSR PC ,CLRTXI ; WRITE ONE TO CLEAR TXI 
7936 ; ERROR ? 
7937 053240 103010 BCC 150$ ; NO 
7938 053242 FTL 
053242 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 











SEQ 244 ) 
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TEST 18: TRANSMIT CHAINING ERROR TEST 
7939 053246 ERRHRD 247. ,ERRO14,MSGOOS ; YES, REPORT ERROR 
053246 104456 TRAP CSERHRD 
053250 000367 -WORD 247 
053252 023561' -WORD ERRO14 
053254 021736’ -WORD MSGOO3S 
7940 053256 ESCAPE TST ; AND ABORT TEST 
053256 104410 TRAP CSESCAPE 
nene 053260 000332 -WORD L10050-. 
Li ;CHECK FIRST RING ENTRY 
7944 053262 012705 000620’ i50$: MOV #TDRB,RS ; CHECK TORB OWNERSHIP 
7945 053266 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
7946 053272 103010 BCC 160$ ; YES 
7947 053274 FTL 
053274 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7948 053300 ERRHRD 250. ,ERRO27 ; NO, REPORT CRROR 
053 104456 TRAP CSERHRD 
053302 000372 -WORD 250 
053304 024540' -WORD ERRO27 
053306 000000 -WORD 9 
7949 053310 ESCAPE TST ; AND ABORT TEST 
053310 104410 TRAP CSESCAPE 
sone 053312 000300 -WORD 110050-. 
i 
7951 053314 012705 016304’ 160$: MOV #TOR18A,R5 ; POINT TO EXPECTED TORS 
7952 053320 004737 032370' JSR PC ,LDXTOR ; LOAD INTO XTORBO TABLE 
7953 053324 012705 000620' MOV @TORB RS ; CHECK TORB 
7954 053330 004737 027500' JSR PC ,CHKTDOR ; ERRORS 7? 
7955 053334 103010 BCC 162$ ; NO 
7956 053336 FTL 
053336 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7957 053342 ERRHRD 251. ,ERRO33,MSGOOS ; YES, REPORT ERROR 
053342 104456 TRAP CSERHRD 
053344 000373 -WORD 251 
053346 025166' -WORD ERROSS 
053350 022042’ -WORD MSGOO05S 
7958 053352 ESCAPE 1ST ; AND ABORT TEST 
053352 104410 TRAP CSESCAPE 
von 053354 000236 -WORD 1L10050-. 
Lan 2 ;CHECK SECOND RING ENTRY 
7962 053356 012705 000634’ 162$: MOV #TORB+12.,R5 ; CHECK TORB OWNERSHIP 
7963 053362 004737 027024’ JSR PC , CHKOWN ; OWN = PORT DRIVER ? 
7964 053366 103010 BCC 164$ s YES 
7965 053370 FTL 
053370 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
7966 053374 ERRHRD 252. ,ERRO28 ; NO, REPORT ERROR 
053374 104456 TRAP CSERHRD 
053376 000374 -WORD 252 








-_——_— eed 
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TEST 18: TRANSMIT CHAINING ERROR TEST 
053400 024645’ -WORD ERROZS 
053402 000000 -WORD 0 
7967 053404 ESCAPE TST ; AND ABORT TEST 
053404 104410 TRAP CSESCAPE 
— 053406 000204 -WORD 1L110050-. 
; 
7969 053410 012705 016314’ 1643: MOV @TOR18B6,R5 ; POINT TO EXPECTED TORB 
7970 053414 004737 032370' JSR PC ,LDXTOR ; LOAD INTO XTORBO TABLE 
7971 053420 012705 000630’ MOV @TORB+8. ,R5 ; CHECK TORB 
7972 053424 004737 027500’ JSR PC .CHKTOR ; ERRORS 7 
7973 053430 103010 BCC 30$ ; NO 
7974 053432 FTL 
053432 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
7975 053436 ERRHRD 253. ,ERRO34,MSGO0S5 ; YES, REPORT ERROR 
053436 104456 TRAP CsERHRD 
3440 0003 -WORD 253 
053442 025255’ -WORD ERRO34 
053444 022042' -WORD MSGO005 
7976 053446 ESCAPE TST ; AND ABORT TEST 
05 104410 TRAP CSESCAPE 
on 053450 000142 -WORD 1L10050-. 
; 
7978 053452 012777 004100 124544 230%: MOV @DNI! INTE, @PCSRO ; ENABLE INTERRUPTS 
7979 053460 112777 000117 124536 MOVB #INTE!STOP ,@PCSRO ; ISSUE STOP PORT COMMAND 
7980 053466 004737 026550’ JSR PC ,.CHKDNI ; ONI ? 
7981 053472 103010 Bcc 2403 ; YES 
7982 053474 FTL 
053474 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
7983 053500 ERRHRD 254. ,ERRO19,MSGOOS : NO, REPORT ERROR 
053500 104456 TRAP CSERHRD 
900376 -WORD 254 
053504 024126' -WORD ERROI9 
053 021736' .WORD SGO0O03 
7984 053510 ESCAPE TST ; AND ABORT TEST 
053510 104410 TRAP CSESCAPE 
nati 053512 000100 .WORD 1L10050-. 
; 
7986 053514 004737 030264’ 240:: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
7987 ; ERROR 7? 
7988 053520 103010 Bcc 250$ ; NO 
7989 053522 FTL 
053522 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
7990 053526 ERRHRD 255. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
053526 104456 TRAP CSERHRD 
053530 000377 WORD 255 
053532 023030’ -WORD ERROOG 
053534 021736‘ -WORD MSGOO3 
7991 053536 ESCAPE TST ; AND ABORT TEST 
0535 104410 TRAP CSESCAPE 
053540 000052 ‘ L10050-. 
7992 053542 250$: 
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TEST 18: TRANSMIT CHAINING ERROR TEST 


7993 053542 004737 030346' 
7994 


7995 053546 
053546 104432 
053550 000042 

7996 

7997 

7998 

7999 053552 104 
053555 125 
053560 124 
053563 116 

3566 111 

053571 103 
053574 111 
053577 116 
053602 105 
053605 117 
053610 000 

8000 

8001 

8002 053612 
05 


3612 
053612 104401 


114 
040 


101 
115 
040 


101 
111 
040 


122 
040 


JSR PC ,CLINTR ; INSURE DELUA INTR BITS CLEAR 


EXIT TST 
TRAP CsExIT 


. WORD L10050- . 


;LOCAL TEST MESSAGE 
T18ID: .ASCIZ ‘DELUA TRANSMIT CHAINING ERROR ‘ 


.EVEN 


ENDTST 
L10050: 
TRAP CsETST 


HARDWARE TESTS 


TEST 18: TRANSMIT CHAINING ERROR TEST 


a, 


053614 
053614 


053614 


053614 
053620 


053624 


053700 
053702 


053702 


103010 


004737 


055374' 
032734’ 


033434' 


004100 
000140 
027736’ 


026652 ' 


030264 ' 


026652’ 


124364 
124356 


<exe~s~ cece et, amas, eC CC CC CL LL LLL LLL LLL LLL ere —— 
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SEQ 247 
_SBTTL TEST 19: DATA CHAINING TEST 
FPAERAAAAESRELEKSERESARERERSESAEAASAEAEEAEASEREREAEEESEEAEEEEEAAEEEEEAEEEDS 
; THIS TEST VERIFIES TRANSMIT AND RECEIVE DATA CHAINING. 
: AN INTERNAL WITH TWO TRANSMIT AND TWO RECEIVE BUFFERS CHAINED. 
TEST SEQUENCE: 
: 1. WRITE MODE REGISTER = PROM MODE INTERNAL LOOPBACK MODE 
: 2. WRITE RING FORMAT 
; 3. WRITE PHYSICAL ADDRESS 
4. SET UP RINGS AND BUFFERS 
TWO TRANSMIT AND RECEIVE BUFFERS 
: 5. ISSUE START 
6. CHECK FOR ERRORS 
: 7. ISSUE STOP 
MTTTITITITITITITITITITITIT ITIL TTT 
BGNTST 
T19:: 
PNTMAC T19ID 
MOV 8T19ID,R4 ;GET POINTER TO TEST NAME MESSAGE 
JSR PC .PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
1s: JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 30$ ; NO 
MOV 2DNI! INTE, @PCSRO ; ENABLE INTERRUPTS 
MOVB = SINTE! RSET, @PCSRO ; YES, RESET DELUA 
JSR PC ,.CKONT ; DNI ? 
BCC 203 ; YES 
FTL 
JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 256..ERROO6,MSGOO3 ; NO, REPORT ERROR 
TRAP _ CSERHRD 
_WORD 256 
"WORD  ERROOS 
"WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP - CSESCAPE 
_WORD L10051-. 
20$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
; ERROR ? 
BCC 30$ ; NO 
FTL 
JSR PC .CHKFTL ; 'FATL' BIT SET? 





aie 
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TEST 19: DATA CHAINING TEST 


8042 053706 


8055 


8056 
8057 
8058 
8059 
8060 


8061 


053776 
054000 


054004 
054006 


054006 


054022 


054026 


104456 
000401 
023030° 
021736’ 


104410 
001502 


004737 
004737 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000404 
023245 ' 
021736' 


104410 
001424 


004737 
103010 


004737 


104456 
000405 
023030' 
021736’ 


104410 
001376 


012705 
004737 
012777 
112777 
004737 
103010 


004737 


030212' 
031732' 
032032' 
0041006 
000101 
026550' 


026652’ 


030264' 


026652' 


012600' 
032002’ 
004100 
000102 
026550' 


026652’ 


124260 
124252 


124160 
124152 


3 
30$: 


50$: 
;sWRITE MODE REGI 
MOV 


ERRHRD 257. ,ERROC6,MSGOOS 


ESCAPE TST 

JSR PC ,CLRBUF 

JSR PC ,LODFLT 

JSR PC ,LDPCSR 

MOV @ONI! INTE , @PCSRO 
MOVB #INTE!GETPCB ,@PCSRO 
JSR PC .CHKONI 

BCC 40$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 260. ,ERROO9,MSGOOS 


ESCAPE TST 

JSR PC ,.CLRONI 
BCC 50$ 

FTL 

JSR PC ,.CHKFTL 


ERRHRD 261. ,ERROO6,.MSGOOS 


ESCAPE TST 


#WTMODE ,RS 
JSR PC ,LDPCBE 
MOV #ONI INTE, &° “SRO 
MOVB #INTE!GETCMD ,a@PCSRO 
JSR PC ,CHKONI 
BCC 60$ 
FTL 
JSR PC ,CHKFTL 





oe &* @+ Se @6¢ Gs GF 


STER = INTERNAL LOOPBACK, 


YES, REPORT ERROR 


AND ABORT TEST 
‘ WORD 


CLEAR XMIT,RECV BUFFERS 





SEQ 248 


CSERHRD 
257 
ERROO6 
MSGOO03 


CSESCAPE 
L10051 ok 


LOAD DEFAULT PHY.ADDRESS TABLES 


ADDRESS OF PCBB -> PCSR2!3 
ENABLE INTERRUPTS 
aay GET_PCBB PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR DONI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


CRC, AND PROM MODE 


; DEFAULT WRITE MODE FUNCTION 


; 'FATL' 


LOAD FUNCTION -> PCBB 
ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 
DNI ? 
YES 


BIT SET? 


CSERHRD 
260 


ERROOP 
MSGO03 


CSESCAPE 
Li0051-. 


CSESCAPE 
L10051-. 
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TEST 19: DATA CHAINING TEST 


8073 054064 


8074 


8975 
8076 
8077 
8078 
8079 


8080 


104456 


000406 
023331' 
021736‘ 


104410 
001324 


004737 
103010 


004737 


104456 
000407 
023030‘ 
021736' 


104419 
001276 


012705 
004737 
012705 
012700 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000410 
023331’ 
021736‘ 


104410 
001210 


004737 
103010 


004737 


030264' 


026652 ' 


012540’ 
032002’ 


030264 ' 


026652’ 


124044 
124036 


60: 


ERRHRD 262. ,ERRO10,MSGO03 


ESCAPE TST 

JSR PC ,CLRONI 

BCC 70$ 

FTL 

JSR PC .CHKFTL 

ERRHRD 263. ,ERROO6,MSGOOS 
ESCAPE TST 


WRITE RING FORMAT 


70$: 


MOV GWTRNGS RS 


JSR PC ,.LDPC8B 

MOV ORFRMT RS 

MOV #6 .RO 

JSR PC ,LDUDBB 

MOV @ONIP INTE, 8PCSRO 
MOVB GINTE!GETCMD ,@PCSRO 
JSR PC ,CHKONI 

BCC 80$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 264. ,ERRO10,MSGOOS 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 90$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 265. ,ERRO06,MSGO0S 


ae 


NO, REPORT ERROR 


TRAP 
.WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR DONI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 





<= 


SEQ 249 


CSERHRD 


CSESCAPE 
L10051-. 


CSESCAPE 
L10051-. 


DEFAULT WRITE RING FORMAT FUNCTION 


LOAD FUNCTION -> PCBB 
DEFAULT RING FORMAT 
FORMAT = SIX WORDS 


ISSUE GET_CMD PORT COMMAND 


DONI ? 

YES 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 
ERROR ? 

NO 

‘FATL' BIT SET? 


YES, REPORT ERROR 


CSERHRD 


264 
ERROIC 
MSGOOS 


CSESCAPE 
L10051-. 











HARDWARE TESTS MACRO YO5.02 Friday 12-Jul-85 09:33 Page 110-3 
TEST 19: CATA CHAINING TEST 


8116 


021736' 


104410 
001162 


012705 


000272' 


026652' 


030264 ' 


026652’ 


015570' 
032164’ 
013540’ 
032070° 


123734 
123726 


ESCAPE TST 


;WRITE PHYSICAL ADDRESS 


90$: 
MOV #DFAULT,RS 


MOV #ONI! INTE, @PCSRO 
oe . 9PCSRO 


MOVB 
JSR PC, CHK 
Bcc 100$ 
FTL 
JSR PC, CHKFTL 
ERRHRD 
ESCAPE TST 

100$: JSR PC ,CLRDNI 
BCC 110$ 
FTL 
JSR PC, CHKFTL 
ERRHRD 
ESCAPE TST 


266. ,ERRO1LO, MSGOO03 


267. ,ERROO6, MSGOOS 


A A LS 


AND ABORT TEST 


GET DEFAULT a 


SAVE IN DEFAULT TABL 





SEQ 250 


CSERHRD 
265 
ERROOG 
MSGO03 


CSESCAPE 
L10051-. 


DEFAULT WRITE PHYSICAL ADDR FUNC 


LOAD FUNCTION -> PCBB 
ENABLE INTERRUPTS 
as GET_CMD PORT COMMAND 


‘FATL' BIT SET? 
NO, REPORT ERROR 


TRAP 

-WORD 

- WORD 

- WORD 
AND ABORT TEST 

TRAP 

- WORD 
WRITE ONE TO CLEAR DNI 
— ? 


‘FATL’' BiT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


; 
;SET UP RINGS FOR TWO BUFFERS CHAINED LOOPBACK 
DEFAULT TWO BUFFER TRANSMIT RING 


110$: MOV #TORB4A,RS5 
JSR PC ,LOTORB 
MOV #RDRB4A,RS 
JSR PC ,LDRDRB 


; 
;SET UP BUFFERS AND START 


LOAD TOR 


CSERHRD 
266 


ERRO10 
MSGOO3 


CSESCAPE 
L1i0051-. 


CSERHRD 
267 
ERROO6 
MSGOO03 


CSESCAPE 
Li0051-. 


B 
DEFAULT TWO BUFFER RECEIVE RING 


LOAD RORB 
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8135 054372 
8136 054376 


TEST 19: DATA CHAINING TEST 


016562’ 


000000 016560’ 
033006‘ 


004100 
000104 
026550' 


026652’ 


030264‘ 


026652’ 


027566' 


026652’ 


030500' 


026652’ 


123606 
123600 


120$: 


1303: 


H 
140$: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


DOCRC 

¢0,BYTCNT 

PC ,SETBUF 

@DNI! INTE, @PCSRO 
#INTE!START, @PCSRO 
PC ,CHKDNI 

120$ 


PC ,CHKFTL 
270. ,ERRO12,MSGO03 


TST 


PC ,CLRONI 
130$ 


PC .CHKFTL 
271. ,ERROOG, MSGOO03 


TST 
PC .CHKTXI 
140$ 


PC ,CHKFTL 
272. ,ERRO13,.MSGOOS 


TST 


PC ,CLRTXI 
150$ 


PC ,CHKFTL 


eer CC CC EE LLL LLL LLL LLL LLL 


SEQ 251 

NO CRC 

BYTES/PACKET 

SET UP BUFFERS 

ENABLE INTERRUPTS 

ISSUE START PORT COMMAND 

ONI? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 270 
-WORD ERROI2 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L1005i-. 

WRITE ONE TO CLEAR DNI 

ERROR 7? 

NO 

‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 271 
-WORD ERROOG6 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD Li0051-. 

TXI ? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 272 
-WORD ERRO13 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10051-. 

WRITE ONE TO CLEAR TXI 

ERROR ? 

NO 

‘FATL' BIT SET? 





_. —_—_ pzrrsstaamassssasaasaassal, ite CC CC CL LL LLL LLL LLL LLL LLL A, 
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8163 


012705 
004737 
103010 


004737 


012705 
004737 
012705 
004737 
103010 


004737 


104456 
000423 
025166‘ 
022042’ 


104410 
000554 


012705 
004737 
103010 


004737 


104456 


000620' 
027024 ' 


026652 ' 


016324' 
032370' 
000620' 
027500’ 


026652 ' 


000630‘ 
027024' 


026652’ 


ERRHRD 273. ,ERRO14,MSGOOS 


ESCAPE TST 


;CHECK FIRST RING ENTRY 


i50$: MOV #TORB,RS 
JSR PC ,CHKOWN 
BCC 160$ 
FTL 


JSR PC ,CHKFTL 
ERRHRD 274. ,ERRO27 


ESCAPE TST 


JSR PC ,LOXTOR 
MOV #TORB,RS 

JSR PC .CHKTDR 
BCC 162$ 


JSR PC ,CHKFTL 


ERRHRD 275. ,ERRO33,MSGOO0S 


ESCAPE TST 


sCHECK SECOND RING ENTRY 


162$: MOV #TORB+8. .RS 
JSR PC ,CHKOWN 
BCC 164$ 
FTL 


JSR PC ,CHKFTL 
ERRHRD 276. ,ERRO28 


YES, REPORT ERROR 


TRAP 
-WORD 
. WORD 
WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER 7? 
YES 
‘FATL’ BIi SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


POINT TO EXPECTED TDORB 
LOAD INTO XTORBO TABLE 
CHECK TORB 

ERRORS ? 

NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
.WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 





SEQ 252 
CSERHRD 
273 
ERRO14 
MSGOO3 


CSESCAPE 
L10051-. 


CSESCAPE 
L10051-. 


CSERHRD 
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8210 
8211 


8212 


8213 


054776 
955000 


055000 
055004 
055004 
055006 
055010 
055012 
055014 
055914 


000424 
024645 ' 
000000 


016334' 


027500’ 


026652’ 


027316' 


026652 ' 


030432’ 


026652’ 


164$: 


; 
170$: 


i 
180$: 


ESCAPE TST 


MOV #TDOR20B,R5 
JSR PC ,LDXTOR 
MOV #TORB+8.,R5S 


JSR PC ,CHKFTL 
277. ,ERRO34,MSGOO05 


ESCAPE TST 
JSR PC ,CHKRXI 
180$ 


JSR PC ,CHKFTL 
280. ,ERRO15, MSGO03 


ESCAPE TST 


JSR PC ,CLRRXI 


BCC 190$ 
FTL 


JSR PC ,CHKFTL 
ERRHRD 281. ,ERRO16,MSGOOS 


ESCAPE TST 


ee OS AT 


AND ABORT TEST 


POINT TG EXPECTED TORB 
LOAD INTO XTORBO TABLE 
CHECK {ORB 

ERRORS ? 

NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
RXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR RXI 
ERROR ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 





SEQ 253 
276 
‘ns 


CSESCAPE 
L10051-. 


CSESCAPE 
L10051-. 


CSESCAPE 
L10051-. 
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055140 
8241 055142 
055142 
055144 
8242 
8243 055146 
8244 055152 
8245 055156 
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004737 


000660‘ 
027024’ 


026652 ' 


000670’ 
027024‘ 


026652’ 


;CHECK FIRST RING ENTRY 


190$: MOV #RORB,RS 
JSR PC ,CHKOWN 
BCC 200% 


FTL 
JSR PC ,CHKFTL 
ERRHRD 282. ,ERRO3O 


ESCAPE TST 


; 
200$: MOV #RDR20A,RS 


JSR PC ,CHKFTL 


ERRHRD 283. ,ERRO36,MSGO06 


ESCAPE TST 


;CHECK SECOND RING ENTRY 


JSR PC ,CHKOWN 
BCC 204% 
FTL 


JSR PC ,CHKFTL 
ERRHRD 284. ,ERRO3S1 


ESCAPE TST 


204$: MOV #RDR20B, RS 
JSR PC ,LDXROR 
MOV #RDRB+8. ,RS 


nn eee re 


CHECK RORB OWNERSHIP 
vee = PORT DRIVER 7 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


POINT TO EXPECTED RDRB 
LOAD INTO XRDORBO TABLE 
CHECK RDORB 


ERRORS 7? 

NO 

‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK RORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
-WORD 
AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED RORB 
LOAD INTO XRDRBO TABLE 
CHECK RDRB 





SEQ 254 


CSERHRD 
284 
‘or 


CSESCAPE 
Li0051i-. 








a EE ae el 
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SEQ 255 


8246 055162 004737 027206’ JSR PC .CHKRDR ; ERRORS ? 

8247 055166 103010 BCC 210$ ; NO 

8248 055170 FTL 
055170 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

8249 055174 ERRHRD 285. ,ERRO37,MSGO06 ; YES, REPORT ERROR 
055174 104456 TRAP CSERHRD 
055176 000435 -WORD 285 
055200 025433' -WORD ERRO37 
0552 022204' -WORD MSG006 

8250 055204 ESCAPE TST ; AND ABORT TEST 
055204 104410 TRAP CSESCAPE 
055206 000214 -WORD L10051-. 

8251 

8252 : 

8253 055210 210$: 

8254 055210 012705 007054' MOV @RBUF2+14,R5 ; POINT TO CRC ADDRESS 

8255 055214 022725 152120 CMP #152120, (R5)+ ; 1ST CRC WORD BAD? 

8 055220 001003 BNE 222$ : YES 

8257 055222 022715 136614 CMP #136614, (R5) ; 2ND CRC WORD BAD? 

8258 055226 001422 BEQ 230$ ; NO, SKIP ERROR REPORT 

8259 055230 222s: 

8260 055230 012703 016574' MOV #XCRC,R3 ; POINT TO ERROR TABLE 

8261 055234 012704 007054’ MOV @RBUF2+14,R4 : POINT TO ACTUAL CRC RECEIVED 

8262 055240 012324 MOV CR3)+,CR4)+ ; LOAD CRC ERROR TABLE 

8263 055242 011314 MOV CR3),CR4) $ 

8264 055244 012703 016574' MOV #XCRC,R3 ; POINT TO EXPECTED CRC TABLE 

8265 055250 012723 152120 MOV #152120, (R3)+ ; LOAD TABLE 

8266 055254 012713 136614 MOV #136614, (R3) 3 

8267 055260 ERRHRD 286. ,ERRO23,MSGO008 : YES, REPORT ERROR 
055260 104456 TRAP CSERHRD 
055262 000436 -WORD 286 
055264 024417’ WORD ERRO2S 
055266 022400' -WORD MmSGC9 

8268 055270 ESCAPE TST ; AND ABORT TEST 
055270 104410 TRAP CSESCAPE 

_— 055272 000130 -WORD L1005i1-. 

8270 055274 230$: 

8271 055274 012777 004100 122722 MOV #ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 

8272 055302 112777 000117 122714 MOVB #INTE! STOP ,a@PCSRO ; ISSUE STOP PORT COMMAND 

8273 055310 004737 026550’ JSR PC ,CHKONI ; ONI ? 

8274 055314 103010 BCC 240$ ; YES 

8275 055316 FTL 
055316 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL’ BIT SET? 

8276 055322 ERRHRD 287.,ERRO19,MSGOO3 ; NO, REPORT ERROR 
055322 104456 TRAP CSERHRD 
055324 000437 -WORD 287 
055326 024126‘ -WORD ERROI9 
055330 021736’ .WORD MSGOO3 

8277 055332 ESCAPE TST ; AND ABORT TEST 
055332 104410 TRAP CSESCAPE 

este 055334 .WORD L10051-. 





ee RE RR nC ct 
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ora. 055336 


004737 030264’ 


103010 


004737 


104401 


026652’ 


030346' 


2408: 


250$: 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 
EXIT 


PC ,CLRONI 
250$ 


PC ,CHKFTL 


290. ,ERROO6 , MSGOO3S 


TST 


PC ,CLINTR 


TST 


;LOCAL TEST MESSAGE 


.EVEN 


ENDTST 


= T1I9ID: .ASCIZ ‘OELUA DATA CHAINING ' 


WRITE ONE TO CLEAR ONI 
— ? 


” 


‘FATL’ BIT SET? 
YES, REPORT ERROR 





SEQ 256 


CSESCAPE 
L10051-. 


CSExIT 
L10051-. 
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TEST 20: PHYSICAL ADDRESS TEST 


ps .SBTTL TEST 20: PHYSICAL ADDRESS TEST 
8299 se aaRSEAREEEEALEREEAAEEREEAEEEAEEEEREREAEAEEEREEEEREEEEEED EAE ESE EEE EE EEE 
8300 : 
8301 ; THIS TEST VERIFIES THAT PHYSICAL ADDRESS DETECTION 
8302 ; IS OPERATIONAL. 
8303 ; A WRITE PHYSICAL ADDRESS FUNCTION IS USED TO SET 
8304 : THE DELUA’'S PHYSICAL ADDRESS. 
8305 : INTERNAL LOOPBACKS ARE THEN PERFORMED WITH A 
8306 ; CURRENTLY ENABLED AND THEN A CURRENTLY DISABLED 
8307 ; DESTINATION ADDRESS. 
8308 : THE PHYSICAL ADDRESS IS THEN COMPLEMENTED AND THE 
8309 ; TEST IS REPEATED. 
8310 ; 
8311 ; TEST SEQUENCE: 
8312 : i. WRITE MODE REGISTER = INTERNAL LOOPBACK 
8313 ; 2. WRITE RING FORMAT 
8314 : 3. WRITE PHYSICAL ADDRESS 
8315 : 4. SET UP RINGS AND BUFFERS 
8316 ; WITH DESTINATION ADDRESS = PHYSICAL ADDRESS 
8317 3 5. ISSUE START 
8318 ; 6. CHECK FOR ERRORS 
8319 ; 7. ISSUE STOP 
8320 ; 8. SET UP RINGS AND BUFFERS 
8321 ; WITH DESTINATION ADDRESS NOT = PHYSICAL ADDRESS 
8322 3 ISSUE START 
8323 ; 10. CHECK FOR NO RXI 
8324 : 11. ISSUE STOP 
8325 : 12. WRITE PHYSICAL ADDRESS- WITH COMPLEMENTED VAULE 
ca : 13. REPEAT STEPS 4 - il 
; 
8328 se ehhheheheh sees bhos bhbhbe 0b hs bb 64660666646600666 64660666 660046 4646060644404 
8329 
8330 055424 BGNTST 
055424 T20:: 
8331 
8332 055424 PNTMAC T20ID 
055424 012704 061054’ MOV #T20ID ,.R4 ;GET POINTER TO TEST NAME MESSAGE 
055430 004737 032734' JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
8333 055434 004737 033434’ JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
8334 055440 103034 BCC 30$ 3; NO 
8335 055442 012777 004100 122554 MOV @ONI P INTE, 8PCSRO ; ENABLE INTERRUPTS 
8336 055450 112777 000140 122546 MOVB GINTE!RSET ,@PCSRO ; YES, RESET DELUA 
8337 055456 004737 027736' JSR PC ,CKDNI ; DNI ? 
8338 055462 103010 BCC 20% ; YES 
8339 055464 FTL 
055464 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
8340 055470 ERRHRD 291. ,ERROO6,MSGOO03S ; NO, REPORT ERROR 
055470 104456 TRAP CSERHRD 
055472 000443 -WORD 291 
055474 023030‘ -WORD ERROOG 
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TEST 20: PHYSICAL ADDRESS TEST 
055476 021736’ -WORD MSGOO03 
8341 055500 ESCAPE TST ; AND ABORT TEST 
055500 104410 TRAP CSESCAPE 
_— 055502 003402 -WORD 110052-. 
: 
8343 055504 004737 030264’ 203: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
8344 ; ERROR 7? 
8345 055510 103010 BCC 30$ : 
8346 055512 FTL 
055512 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
8347 055516 ERRHRD 292. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
055516 104456 TRAP CSERHRD 
055 000444 WORD 2 
055522 023030' «WORD ERROOG 
055 021736' -WORD 4SG003 
8348 055526 ESCAPE TST ; AND ABORT TEST 
0555 104410 TRAP CSESCAPE 
nage 055530 003354 -WORD 1L10052-. 
8350 055532 30$: 
8351 055532 004737 030212’ JSR PC ,CLRBUF ; CLEAR XMIT,RECV BUFFERS 
8352 055536 004737 031732’ JSR PC ,LDOFLT ; LOAD DEFAULT PHY.ADDRESS TABLES 
8353 055542 004737 032032' JSR PC ,.LOPCSR ; ADDRESS OF PCBB -> PCSR2!3 
8354 055546 012777 004100 122450 MOV @DNI! INTE, @PCSRO ; ENABLE INTERRUTS 
8355 055554 112777 000101 122442 MOVB #INTE!GETPCB ,@PCSRO ; ISSUE GET_PCBB PORT COMMAND 
8356 055562 004737 026550’ JSR PC ,.CHKDNI 3; ONI? 
8357 055566 103010 BCC 40$ ; YES 
8358 055570 FTL 
055570 004737 026652’ JSR PC .CHKFTL 3; ‘FATL‘ BIT SET? 
8359 055574 ERRHRD 293. ,ERROO9,MSGOOS ; NO, REPORT ERROR 
055574 104456 TRAP CSERHRD 
055576 000445 -WORD 293 
055600 023245’ -WORD ERROOS 
055602 021736‘ .WORD MSGOO3 
8360 055604 ESCAPE TST ; AND ABORT TEST 
055604 104410 TRAP CSESCAPE 
ai 055606 003276 -WORD 1L10052-. 
; 
8362 055610 004737 030264' 40$: JSR PC ,.CLRONI ; WRITE ONE TO CLEAR DNI 
8363 : ERROR ? 
8364 055614 103010 Bcc 50$ ; NO 
8365 055616 FTL 
055616 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
8366 055622 ERRHRD 294, ,ERROO6,MSGO0S ; YES, REPORT ERROR 
055622 104456 TRAP CSERHRD 
055624 .WORD 
055626 023030’ .WORD ERROOG 
0556 021736’ .WORD MSGOOS 
8367 055632 ESCAPE TST ; AND ABORT TEST 
055632 104410 TRAP CSESCAPE 
055634 003250 -WORD 1L10052-. 









8375 055662 
8376 055670 
8377 055674 
8378 055676 

0556 76 


8379 055702 
055702 


8380 055712 
055712 
055714 

8381 

8382 055716 

8383 

8384 055722 

8385 055724 
055724 


8386 055730 





030264 ' 


026652’ 


000302 ' 
122342 
122334 


122226 
122220 
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é 
;sWRITE MODE REGISTER = INTERNAL LOOPBACK 
50$: 


MOV @ONI! INTE, @PCSRO 
MOVB @INTE!GETCMO ,@PCSRO 
JSR PC ,CHKDNI 

BCC 60$ 


JSR PC ,CHKFTL 
ERRHRD 295. ,ERRO10,MSGO0S 


ESCAPE TST 


JSR PC ,CLRONI 
BCC 70$ 


JSR PC ,CHKFTL 
ERRHRD 296. ,ERROO6,MSGOOS 


ESCAPE TST 


; 
sWRITE RING FORMAT 


70$: 


AOV @UTRNGS RS 
OPCBB 


MOV #6 ,RO 
JSR PC .LOUDBB 
MOV @ONI ! INTE. SPCSRO 


MOVE @INTE!GETCHD , @PCSRO 
a 


JSR PC ,CHKFTL 
ERRHRD 297. ,ERRO10,MSGOOS 


DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 

MODE = INTL LOOPBACK ONLY 
ENABLE INTERRUPTS 

ISSUE GE 


T_CMD PORT COMMAND 
DNI ? 


‘FAT..' BIT SET? 
NO, REPORT ERROR 
TRAP 
.WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR ONI 
ERROR 7? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


CSERHRD 
295 
ERRO10 
MSGOO3 


CSESCAPE 
L10052- ° 


CSERHRD 
296 
ERROO6 
MSGOO3 


CSESCAPE 
L10052-. 


DEFAULT WRITE seg Ste FUNCTION 


LOAD FUNCTION -> P 
DEFAULT RING FORMAT 


ISSUE GET_CMD PORT COMMAND 
ONI ? 
YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 





TRAP 
. WORD 


CSERHRD 
297 


- 
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8408 


8433 


ELS LD 
ac rrr 


056152 
056154 


056160 
056162 


056162 
056166 


023331° 
021736' 


104410 
003054 


004737 
103010 


004737 


104456 
000454 
023030’ 
021736‘ 


104410 
003026 


012705 
004737 
012705 
004737 
012701 
010102 
004737 
012777 
112777 
004737 
103010 


004737 


104456 . 


000455 
023331' 
021736‘ 


104410 
002732 


004737 
103010 


004737 


030264’ 


026652 ' 


026652‘ 


030264' 


026652’ 


122104 
122076 


3 
80$: 


“WRITE PHYSICAL 


90$: 


100$: 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 


TST 


PC ,CLRONI 


90$ 


PC .CHKFTL 
300. ,ERROO6, MSGOO0S 


TST 


ADDRESS 


@ADR21,R5 


@ONI! INTE, SPCSRO 
#INTE!GETCMD ,@PCSRO 
PC ,CHKONI 

100$ 


PC .CHKFTL 
301. ,ERRO10,MSGO03 


TST 


PC ,CLRONI 
110$ 


PC ,CHKFTL 


ERRHRD 302. ,ERRO06,MSGO03 





«WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR ONI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


GET NEW PHYSICAL ADDRESS 
SAVE IT IN DEFAULT TABLE 
DEFAULT WRITE PHYSICAL ADDR 
LOAD FUNCTION -> PCBB 

GET PHYSICAL ADDRESS 

SOURCE = DESTINATION 

LOAD PHY ADR IN ADR TABLES 
ENABLE INTERRUPTS 

age GET_CMD PORT COMMAND 


YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR DNI 
— ? 


‘FATL' BIT SET? 
YES, REPORT ERROR 





SEQ 260 
ERRO10 
MSGO03 


CSESCAPE 
L10052-. 


FUNC 


CSESCAPE 
L10052-. 











EE EE EEE, TT 
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8460 


8461 


8462 
8463 
8464 
8465 


Rar rere 


056166 
056179 
056172 
056174 
056176 
056176 
056200 


056336 


103010 


004737 


104456 
000457 
023447 ' 
021736’ 


104410 
002604 


004737 
103010 


004737 


104456 
000460 
023030’ 
021736’ 


104410 
002556 


004737 
103010 


014410° 
032164’ 
012750‘ 
032070° 


016562’ 


026652’ 


030264 ' 


026652’ 


027566’ 


016560' 


121756 
121750 


3 
;SET UP 
1108: 


SET UP 


1208: 


1308: 


ESCAPE 


RINGS FOR ONE BUFFER LOOPBACK 


ESCAPE 


TST 


#TDORB1A,RS 

PC .LDOTORB 
@RORB1A,RS 

PC ,LDRORB 

AND START 

DOCRC 

#6 ,BYTCNT 

PC ,SETBUF 

@ONI! INTE, @PCSRO 
@INTE! START, @PCSRO 
PC ,CHKONI 

1208 

PC .CHKFTL 


303. ,ERROL2,MSGO03 


TST 


PC .CLRONI 
130$ 


PC ,CHKFTL 
304. ,ERROO6 ,MSGOO3 


TST 


PC ,.CHKTXI 
140$ 


AND ABORT TEST 





SEQ 261 


CSERHRD 
302 
ERROOE 
MSGO03 


CSESCAPE 
L10052-. 


DEFAULT ONE BUFFER TRANSMIT RING 


LOAD TORB 


DEFAULT ONE BUFFER RECEIVE RING 


LOAD RORB 


NO CRC 

BYTES/PACKET 

SET UP BUFFERS 

ENABLE INTERRUPTS 

as” START PORT COMMAND 


YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
“WORD 
“WORD 
AND ABORT TEST 
TRAP 
WORD 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
WORD 
“WORD 
“WORD 
AND ABORT TEST 
TRAP 
WORD 
TXI ? 
YES 


CSERHRD 
304 
ERROO6 


CSESCAPE 
L10052-. 
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8466 


8489 


004737 


104456 
000461 
023530° 
021736’ 


104410 
002530 


004737 
103010 


004737 


012705 
004737 
103010 


104456 
000466 
024206’ 
022042' 


026652 ' 


030500‘ 


026652’ 


000620’ 
027024 ' 


026652’ 


016264 ' 
032370’ 
000620‘ 
027500' 


026652’ 


; 
140$: 


1503: 


160$: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


JSR 


PC ,CHKFTL 
305. ,ERRO13,MSGU03 


TST 


PC .CLRTXI 
150$ 


PC ,CHKFTL 
306. ,ERRO14,MSGO03 


TST 


#TORB,RS 
PC ,CHKOWN 
160$ 


PC .CHKFTL 
307. ,ERRO18 


TST 


@TDOR14A,R5 
PC ,LDXTDR 
#TORB.RS 
PC ,CHKTOR 
170$ 


PC ,CHKFTL 


ERRHRD 310. ,ERRO20,MSGO05 





ee @8 G6 @ Ge me 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR TXI 
_ ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


POINT TO EXPECTED TDORB 
LOAD INTO XTDRBO TABLE 
CHECK TORB 
ERRORS ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 





SEQ 262 


CSERHRD 
305 
ERRO13 
MSGO03 


CSESCAPE 
L10052-. 


CSERHRD 
306 


ERRO14 
MSGO003 


CSESCAPE 
L10652-. 











LT TOS LL TE 
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8490 056474 
056474 


8510 
05 


8511 
8512 
8513 
8514 
8515 
8516 
8517 


056476 


056500 
056504 
056506 


056506 
056512 


056606 
056612 
056616 
056622 
056626 
056630 


104410 
002406 


004737 
103010 
004737 


104456 
000467 
023627’ 
021736' 


104410 
002360 


004737 
103010 


004737 


023660’ 
021736’ 


104410 
002332 


012705 


004737 
103010 


004737 


104456 
000471 
023726’ 
000000 


104410 
002300 


012705 


027316' 


026652 ' 


030432! 


026652 ' 


000660' 
027024’ 


026652 ' 


016454' 
032340' 
000660' 
027206' 


; 
170$: 


180$: 


190$: 


200$: 


ESCAPE 


JSR 


-ERRHRD 


ESCAPE 


TST 


PC ,CHKRXT 
180$ 


PC ,CHKFTL 
311. ,ERRO1S,MSGOO3 


TST 
PC ,CLRRXI 
190$ 


PC ,CHKFTL 
312. ,ERRO16,MSGOO3 


TST 


#RDRB RS 

PC ,CHKOWN 
2008 

PC .CHKFTL 
313. ,ERROL7 


TST 


#RDR2OC ,RS 
PC ,LOXRDR 
#RORB RS 
PC ,CHKRDR 
210$ 


AND ABORT TEST 


TRAP 
. WORD 
RXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR RXI 
— ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
-WORD 
- WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK RORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 


POINT TO EXPECTED RDRB 
LOAD INTO XRDRBO TABLE 
CHECK RDRB 
ERRORS ? 
NO 





SEQ 263 


CSESCAPE 
L10052-. 


CSESCAPE 
L10052-. 
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8518 056634 


004737 


024417’ 
022400‘ 


1° 4410 
€J2162 


012777 
112777 
004737 
103010 


004737 026652’ 


016560' 
030712' 


006472’ 
030642’ 


004100 121272 
000117 121264 


026550‘ 


026652’ 


030264 ' 


JSR PC ,CHKFTL 
ERRHRD 314. ,ERRO21,MSGO06 


ESCAPE TST 


; 
;COMPARE RBUF WITH TBUF 


2108: 


; 
2208: 


; 
230$: 


: 
2405: 


» 


MOV BYTCNT,RS 
JSR PC ,CMPDAT 


BCC 220% 
ERRHRD 315. ,ERRO22,MSGO007 
ESCAPE TST 


MOV @#RBUF +32 ,R5 
JSR PC ,CMPCRC 


230% 
316. ,ERRO23,MSGO0S 
ESCAPE TST 


MOV @ONI! INTE, @PCSRO 


MOVB #INTE!STOP ,@PCSRO 
JSR PC ,CHKONI 

BCC 2403 

FTL 


JSR PC ,CHKFTL 
317. ,.ERRO19,MSGOOS 


ESCAPE TST 


JSR PC ,CLRONI 





‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
-WORD 
COMPARE DATA 
= COMPARE ERROR 7 
YES, REPORT ERROR 
TRAP 
- WORD 
id WORD 
-WORD 
AND ABORT TEST 
TRAP 
-WORD 
POINT TO EXPECTED CRC 
ERRORS ? 
NO 
YES, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 
DNI ? 

YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE GNE TO CLEAR DONI 





SEQ 264 


timate 


CSERHRD 
314 
ERRO21 
MSGO006 


CSESCAPE 
L19052-. 


CSESCAPE 
L10052-. 
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057010 


103010 
004737 


104456 
000500 
023030’ 
021736' 


104410 
002072 


012702 
7 


026652‘ 


030236 ' 
014410’ 
032164 ' 
012750' 
032070' 


030264’ 


026652' 


016560' 


121124 
121116 





ET 
SEQ 265 | 
; ERROR ? 
Bcc 2508 ; NO 
FTL 
JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 320. ,ERROO6,MSGO03 ; YES, REPORT ERROR | 
TRAP  CSERHRD 
_WORD 0 
"WORD  ERROOG 
"WORD  MSG003 
ESCAPE TST ; AND ABORT TEST 
TRAP - CSESCAPE 
‘WORD 10052-. 
DESTINATION ADDRESS NOT = PHYSICAL ADDRESS 
;SET UP RINGS FOR ONE BUFFER LOOPBACK 
250$: 
JSR PC, CLRCV ; CLEAR RECEIVE BUFFER 
MOV #TORBIA, RS ; DEFAULT ONE BUFFER TRANSMIT RING 
JSR PC ,LDTORB ; LOAD TORB 
MOV @RDRBLA, RS | DEFAULT ONE BUFFER RECEIVE RING 
JSR PC ,LDRDORB ; LOAD RORB 
° 
:SET UP BUFFERS AND START 
MOV #ADR21,R1 ; SET SOURCE = PHYSICAL ADDRESS 
MOV SADR21C,R2 ; DEST = COMPLEMENTED ADDRESS 
JSR PC, SRCDST ; LOAD PACKET ADDRESSES 
CLR DOCRC ; NO CRC 
MOV 26,BYTCNT ; BYTES/PACKET 
JSR PC. SETBUF ; SET UP BUFFERS 
MOV @ONI ! INTE, SPCSRO ; ENABLE INTERRUPTS 
MOVB = #INTE! START, @PCSRO ; ISSUE START PORT COMMAND 
JSR PC, CHKDNI ; DNI? 
Bcc 260$ ; YES 
FTL 
JSR PC. CHKFTL ; ‘FATL' BIT SET? 
4 ERRHRD 321. ,ERRO12,MSGO03 ; NO, REPORT ERROR 
TRAP  CSERHRD 
WORD 321 
“WORD ERROI2 
“WORD  MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP  CSESCAPE 
_WORD L10052-. 
; 
260$: JSR PC, CLRONI ; WRITE ONE TO CLEAR ONI 
; ERROR ? 
BCC 2708 ; NO 
FTL 
JSR PC. CHKFTL ; ‘FATL' BIT SET? 
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8582 057146 
057146 


8603 


057222 


104456 
000502 
023030' 
021736‘ 


104410 
001724 


004737 
103010 
004737 


104456 
000503 
023530' 
021736' 


104410 
001676 


004737 
103010 


004737 


104456 
000504 
023561’ 
021736’ 


104410 
001650 


012705 


027566‘ 


026652' 


030500' 


026652' 


000620' 
027024’ 


026652’ 


: 
2703: 


; 
2805: 


290$: 


ERRHRD 322. ,ERRO0O6,MSGOO0S 


ESCAPE TST 
JSR PC ,CHKTXI 
280$ 


JSR PC .CHKFTL 
ERRHRD 323. ,ERRO13,MSGO03 


ESCAPE TST 


JSR PC ,CLRTXI 


BCC 290% 
FTL 


JSR PC ,CHKFTL 
ERRHRD 324. ,ERRO14,MSGO03 


ESCAPE TST 


MOV #TORB.RS 


JSR PC ,CHKOWN 
BCC 300% 

FTL 

JSR PC .CHKFTL 
ERRHRD 325. ,ERRO18 
ESCAPE TST 





YES, REPORT ERROR 


TRAP 
.WORD 
.WORD 
. WORD 
AND ABORT TEST 
TRAP 
.WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
WORD 
WRITE ONE TO CLEAR TXI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TDRB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


SEQ 266 


CSERHRD 
322 
ERROOE 
MSGO03 


CSESCAPE 
L10052-. 


CSERHRD 
325 
_—_ 


CSESCAPE 
L10052-. 





-_ — 
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TEST 20: PHYSICAL ADDRESS TEST 
8605 057270 


024206 ' 
022042‘ 


104410 
001554 


004737 
103010 
004737 


104456 
000507 
025575‘ 
000000 


104410 
001526 


012777 
112777 
004737 
103010 


004737 


104456 
000512 
024126' 
021736’ 


104410 
001464 


004737 
103010 


004737 


016344’ 
032370' 
0006 


026652’ 


032422‘ 


026652’ 


004100 
000117 
026550’ 


026652’ 


030264 ' 


026652’ 





300$: 


3 
310$: 


330$: 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


ESCAPE 


BCC 
FTL 


#TOR21X,R5 


PC ,CHKFTL 
326. ,ERRCG20,MSGO05 


TST 

PC ,NORXT 
320$ 

PC ,CHKFTL 
327. ,ERROS9 


TST 


#ONI ! INTE, @PCSRO 
@INTE! STOP ,aPCSRO 
PC ,CHKDNI 

330$ 


PC ,CHKFTL 
330. ,ERRO19,MSGOOS 


TST 


PC ,CLRONI 
340$ 


PC ,CHKFTL 


SEQ 267 


POINT TO EXPECTED TORB 


LOAD INTO XTORBO TABLE 

CHECK TORB 

ERRORS 7? 

NO 

‘FAT.’ O41 SEN? 

YES, REPORT ERROR 
TRAP CSERHRD 
- WORD 6 
-WORD ERROZO 
-WORD MSGOOS 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10052-. 

RXI 7? 

NO 

‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 327 
-WORD ERROS9 
-WORD 0 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10052-. 

ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 

DNI ? 

YES 

‘FATL‘ BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 3350 
-WORD ERRO19 
-WORD MSGOOS 

AND ABORT TEST 

TRAP CSESCAPE 

-WORD L10052-. 

WRITE ONE TO CLEAR ONI 

ERROR ? 

NO 

‘FATL' BIT SET? 





~~ - 
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8633 057434 
0574 


030236 ' 


000102 
026550’ 


026652’ 


030264 ' 


026652 ' 





120510 
120502 





SS | LL ST 


SEQ 268 
ERRHRD 331. ,ERROO6,MSGOO03 ; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 331 
-WORD ERROOG 
-WORD MSGOO03 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10052-. 
; 
;sREPEPT WITH COMPLEMENTED PHYSICAL ADDRESS 
é 
;WRITE PHYSICAL ADDRESS 
3408: 
JSR PC ,CLRCV ; CLEAR RECEIVE BUFFER 
MOV #ADR21C,R5 ; GET NEW PHYSICAL ADDRESS 
JSR PC ,LDPHYA ; SAVE IT IN DEFAULT TABLE 
MOV @WTPHYA,RS ; DEFAULT WRITE PHYSICAL ADDR FUNC 
JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
MOV @ADR21C,R1 5 NEW SOURCE ADDRESS 
MOV R1,R2 : SOURCE = DESTINATION 
JSR PC ,,SRCOST ; SAVE PACKET ADDRESSES 
MOV @ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 
MOVB @INTE!GETCMD,@P: SRO ; ISSUE GET_CMD PORT COMMAND 
JSR PC , CHKONI ; ONI 7? 
BCC 350$ : YES 
FTL 
JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
ERRHRD 332. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 332 
-WORD ERRO1I0 
-WORD M™SGOOS 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10052-. 
e 
7505: JSR PC ,.CLRONI ; WRITE ONE TO CLEAR DNI 
s ERROR ? 
Bcc 360$ ; NO 
FTL 
JSR PC ,.CHKFTL s ‘FATL’ BIT SET? 
ERRHRD 333. ,ERROO6, MSGO0S ; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 333 
-WORD ERROOG 
-WORD MSGOOS 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10052-. 


; 
;SET UP RINGS FOR ONE BUFFER LOOPBACK 





oe 
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004737 


014410' 
032164 ' 
012750' 
032070' 


016562’ 


026652‘ 


030264 ' 


026652’ 


027566' 


026652 ' 


016560' 


120362 
120354 


360$: 


: 
;SET UP 


; 
370$: 


? 
380$: 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


#TORB1A,R5 

PC ,LDTORB 
@RDRB1A,RS 

PC ,LDRORB 

AND START 

DOCRC 

#6 ,BYTCNT 

PC ,SETBUF 

#DNI! INTE. @PCSRO 
#INTE! START, @PCSRO 
PC ,.CHKONI 

370$ 

PC ,CHKFTL 

334. ,ERRO12,MSG003 


TST 


PC ,.CLRONI 
380$ 


PC .CHKFTL 
335. ,ERROO6 ,MSGOO0S 


TST 
PC ,CHKTXI 
3903 


PC ,CHKFTL 
336. ,ERRO13,MSGOO03 


TST 


ee ene 





SEQ 269 
DEFAULT ONE BUFFER TRANSMIT RING 
LOAD TORS 
DEFAULT ONE BUFFER RECEIVE RING 
LOAD RDRB 
NO CRC 
BYTES/PACKET 
SET UP BUFFERS 
ENABLE INTERRUPTS 
ISSUE START PORT COMMAND 
DNI? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 334 
-WORD ERROI2 
-WORD MSGOO3 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L110052-. 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 335 
- WORD 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD 110052-. 
TI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 336 
-WORD ERRO135 
-WORD MSGOO3 
AND ABORT TEST 
TRAP CSESCAPE 
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057750 
057752 


001134 
004737 
103010 


030500’ 


026652 ' 


000620' 
027024 ' 


026652' 


016264' 
032370’ 
000620' 
027500’ 


026652’ 


027316’ 


026652 ' 





JSR 


BCC 
FTL 


JSR 
ERRHRD 


3903: 


ESCAPE 


; 
400$: 


JSR 
ERRHRD 


ESCAPE 


; 
410$: 


; 
420$: 


PC ,CLRTXI 
400$ 


PC ,CHKFTL 
337. ,ERROi4,MSGOO3 


TST 


#TORB,RS 
PC ,CHKOWN 
410$ 


PC ,CHKFTL 
340. ,ERRO18 


TST 


#TDOR14A,R5 


PC ,CHKFTL 
341. ,ERRO20,MSGOO0S 


TST 
PC ,CHKRXT 
430$ 


PC ,CHKFTL 


en EC EOE TL ELLE LLL LLL LLL LLL LE LAL LLL LLL, 


WRITE ONE TO CLEAR TXI 
rn ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
POINT TO EXPECTED TORB 
LOAD INTO XTORBO TABLE 
CHECK TORB 
ERRORS 7? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
RXI ? 
YES 
‘FATL' BIT SET? 





SEQ 270 


L10052-. 


CSERHRD 
337 


ERRO14 
MSGO03 


CSESCAPE 
L10052-. 


CSERHRD 
340 
_— 


CSESCAPE 
L10052-. 


341 
ERRO2O 
MSGOOS 


CsESCAPE 
L10052-. 
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SEQ 271 


8723 060106 ERRHRD 342. ,ERRO1S,MSGOOS ; NO, REPORT ERROR 
060106 104456 TRAP CSERHRD 
060110 000526 -WORD 342 
060112 023627’ «WORD ERROIS 
060114 021736’ -WORD MSGOO3 
8724 060116 ESCAPE TST ; AND ABORT TEST 
060116 104410 TRAP CSESCAPE 
; 
8726 060122 004737 030432’ 430$: JSR PC, CLRRXI ; WRITE ONE TO CLEAR RXI 
8727 ; ERROR 7? 
8728 060126 103010 BCC 440$ ; NO 
8729 060130 FTL 
060130 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
8730 060134 ERRHRD 343. ,ERRO16,MSGOOS ; YES, REPORT ERROR 
060134 104456 TRAP CSERHRD 
060136 000527 -WORD 343 
060140 023660’ -WORD ERRO16 
060142 021736’ -WORD MSGOO3 
8731 060144 ESCAPE TST ; AND ABORT TEST 
060144 104410 TRAP CSESCAPE 
orne 060146 000736 -WORD 1L10052-. 
' ; 
@733 060150 012705 000660’ 440$: MOV @RORB RS ; CHECK RORB OWNERSHIP 
8734 060154 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER 7 
8735 060160 103010 BCC 450$ ; YES 
8736 060162 FTL 
060162 004737 026652' JSR PC ,CHKFTL 3; ‘FATL’ BIT SET? 
8737 060166 ERRHRD 344. ,ERRO17 ; NO, REPORT ERROR 
060166 104456 TRAP CSERHRD 
060170 000530 -WORD 344 
060172 023726' -WORD ERRO17 
060174 -WORD 0 
8738 060176 ESCAPE TST ; AND ABORT TEST 
060176 104410 TRAP CSESCAPE 
—_ 060200 000704 -WORD 1L10052-. 
3 
8740 060202 012705 016454' 450%: MOV 20C.R5 ; POINT TO EXPECTED RDORB 
8741 060206 004737 032340' R PC ,.LDXROR ; LOAD INTO XRORBO TABLE 
8742 060212 012705 000660’ MOV B, ; CHECK RDRB 
8743 060216 004737 027206' JSR PC ,.CHKRDR ; ERRORS ? 
8744 060222 103010 BCC 4603 : NO 
8745 060224 FTL 
060224 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
8746 060230 ERRHRD 345. ,ERRO21,MSGO06 ; YES, REPORT ERROR 
060230 104456 
060232 000531 
060234 024267' 
060236 022204’ 
8747 060240 ESCAPE TST ; AND ABORT TEST 








- 
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TEST 20: PHYSICAL ADDRESS TEST 
060240 104410 TRAP CSESCAPE 
poo 060242 000642 «WORD 110052-. 
: 
ple ;COMPARE RBUF WITH TBUF 
8751 060244 013705 016560’ 460%: MOV BYTCNT RS ; COMPARE DATA 
8752 060250 004737 030712’ JSR PC ,.CMPDAT ; DATA COMPARE ERROR 7 
8753 060254 103006 BCC 470$ ; NO 
060256 ERRHRD 346. ,ERRO22,MSG007 ; YES, REPORT ERROR 
060256 104456 TRAP CSERHRD 
060260 000532 -WORD 346 
62 024350' -WORD ERROZ2 
060264 022346' «WORD SGO007 
8755 060266 ESCAPE TST ; AND ABORT TEST 
060266 104410 TRAP CSESCAPE 
060270 000614 -WORD 1L10052-. 
8756 3 
8757 060272 470$: 
8758 060272 012705 006472' MOV @RBUF +26. ,R5 s CHECK CRC 
8759 060276 004737 030642’ JSR PC .CMPCRC 5 ERRORS 7 
8760 103006 BCC 480$ 3; NO 
8761 060 ERRHRD 347. ,ERRO23,MSGO08 s YES, REPORT ERROR 
060304 104456 TRAP CSERHRD 
060306 000533 -WORD 347 
060310 024417’ -WORD ERROZS 
060312 022400' -WORD MSGO008 
8762 060314 ESCAPE TST ; AND ABORT TEST 
060314 104410 TRAP CSESCAPE 
060316 000566 -WORD 1L10052-. 
8763 ; 
8764 060320 480$: 
8765 060320 012777 004100 117676 MOV @ONI! INTE, SPCSRO ; ENABLE INTERRUPTS 
8766 060326 112777 000117 117670 MOVB @INTE! STOP ,@PCSRO s ISSUE STOP PORT COMMAND 
8767 060334 094737 026550’ JS& PC .CHKONI ; ONI 7? 
8768 060340 103010 Bcc 490$ ; YES 
8769 060342 FTL 
060342 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
8770 060346 ERRHRD 350. ,.ERRO19,MSGOOS ; NO, REPORT ERROR 
060346 104456 TRAP CSERHRD 
060350 000536 -WORD 350 
060352 024126' -WORD ERROIS 
0603 021736’ -WORD MSGOOS 
8771 060356 ESCAPE TST ; AND ABORT TEST 
0603 104410 TRAP CSESCAPE 
000524 -WORD 110052-. 
3 
8773 060362 004737 030264’ 4903: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
8774 ; ERROR ? 
8775 060366 103010 Bcc 500% 3; NO 
8776 060370 FTL 
060370 004737 026652’ JSR PC .CHKFTL 3; ‘FATL‘ BIT SET? 
8777 060374 ERRHRD 351. ,ERROO6, MSGOOS ; YES, REPORT ERROR 
060374 104456 
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8812 


000537 


023030° 
021736' 


104410 
0004 76 


012701 
012702 
004737 
005037 
012737 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
000540 
023447' 
021736’ 


104410 
000356 


094737 
103010 


004737 


104456 
000541 
023030' 
021736’ 


104410 


030236’ 
014410' 
032164' 
012750’ 
032070' 


016066 ' 
016060' 
033206 ' 
016562’ 
000006 
033006 ' 
004100 
000104 
026550' 


026652’ 


030264 ' 


026652’ 


016560' 


117530 
117522 


ESCAPE 


TST 





; AND ABORT TEST 


; 
s;DESTINATION ADDRESS NOT = PHYSICAL ADDRESS 


SET UP RINGS FOR ONE BUFFER LOOPBACK 


500$: 


: 
;SET UP 


510$: 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


PC ,CLRCV 

¢TORB1A,RS 
PC, ,.LDTORB 
@RORB1A,RS 
PC ,LORORB 
AND START 


@ADR21C,R1 


PC ,SETBUF 

@DNI INTE. @PCSRO 
@INTE! START, @PCSRO 
PC ,.CHKONI 

510$ 

PC .CHKFTL 


352. ,ERROL2,MSGO03S 


TST 


PC ,CLRONI 
520$ 


PC ,CHKFTL 
353. ,£RROO6,MSGOOS 


TST 


CLEAR RECEIVE BUFFER 





SEQ 273 


351 
ERROO6 
MSGO03 


CSESCAPE 
L10052-. 


DEFAULT ONE BUFFER TRANSMIT RING 


LOAD TORB 


DEFAULT ONE BUFFER RECEIVE RING 


LOAD RDORB 


GET PHYSICAL ADDRESS FOR SOURCE 


COMPLIMENT = 
SAVE FOR PACKET ASSEMBLY 
NO CRC 

BY TES/PACKET 

SET UP BUFFERS 

ENABLE INTERRUPTS 

ISSUE START PORT COMMAND 


DNI? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 


DESTINATION ADDRESS 


CSERHRD 
352 
ERRO12 
MSGOO03 


CSESCAPE 
L10052-. 


CSESCAPE 
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8813 
8814 
6815 
8816 


8817 


060554 


050556 
660562 
060564 


000330 


004737 
103010 


004737 


104456 
000542 
023530' 
021736' 


104410 
000302 


004737 
103010 


004737 


012705 
004737 
103010 


004737 


104456 
000544 
024026’ 
000000 


104410 
000222 


012705 
004737 
012705 
004737 
103010 


004737 


027566 ' 


026652 


030500’ 


026652 ' 


000620' 
027024’ 


926652’ 


016344 ' 
032370’ 
000620’ 
027500’ 


026652‘ 


3 
5208: 


5303: 


t 
540$: 


5503: 


ESCAPE 


PC .CHKTXI 
530$ 


PC ,CHKFTL 
354. ,ERRO13,MSGO03 


TST 


PC ,.CLRTXI 
540$ 


PC .CHKFTL 
355. .ERRO14,.MSGOO3 


TST 


#TORB.RS 
PC ,CHKOWN 
5508 


PC ,CHKF TL 
356. ,ERRG18 


TST 


#TDOR21X,RS 
PC ,.LDXTOR 
#TORB,RS 
PC ,CHKTOR 
560$ 


PC ,CHKFTL 





. WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR TXI 
— ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED TORB 
LOAD INTO XTDRBO TABLE 
CHECK TORB 
ERRORS ? 
NO 


‘FATL' BIT SET? 





a oe 
SEQ 274 


L10052-. 


CSERHRD 
354 


ERRO13 
MSGO03 


CSESCAPE 
L10052-. 


CSESCAPE 
L10052-. 
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8840 060712 
060712 
060714 
060716 
060720 

8841 060722 
060722 
060724 


8843 060726 


8846 060740 


8862 061030 


8863 061040 
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104456 
000545 
024206’ 
022042 ' 


104410 
000160 


004737 
103010 


004737 


012777 
112777 
004737 
103010 


004737 


104456 
000551 
024126' 
021736' 


104410 
000070 


004737 
103010 


004737 


104456 
000552 
023030' 
021736‘ 


104410 


032422' 


026652’ 


004100 117242 
000117 117234 
026550’ 


026652’ 


030264 ' 


026652’ 


; 
560$: 


5708: 


4 
580$: 


ERRHRD 


ESCAPE 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


357. ,ERRO20,MSGOO05 


TST 


PC ,NORXI 
570$ 


PC ,CHKFTL 
360. ,ERRO39 


TST 


@DNI! INTE, @PCSRO 
#INTE! STOP ,aPCSRO 
PC .CHKDNI 

580$ 


PC .CHKFTL 
361. ,ERROi9,MSGOO0S 


TST 


PC ,CLRONI 
590$ 


PC ,CHKFTL 
362. ,ERRGO6, MSGOO0S 


TST 





YES, REPORT ERROR 


AND ABORT TEST 
RXI ? 

NO 

‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 
DNI ? 

YES 

‘FATL’ BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR DNI 
_ ? 


‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 





SEQ 275 


CSERHRD 
357 
ERRO2O 
MSGOOS 


CSESCAPE 
L100S2-. 


CSERHRD 
360 
—— 


CSESCAPE 
L10052-. 


CSESCAPE 








ET LT 








— 
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061042 000042 -WORD 110052-. 


8864 061044 590$: 
omer 051044 004737 030346' JSR PC, ,CLINTR ; INSURE DELUA INTR BITS CLEAR 
8867 061050 EXIT TST 

061050 104432 TRAP CSEXIT 
oie 061052 000032 -WORD L10052-. 
oe ;LOCAL TEST MESSAGE 
8871 061054 104 105 114 T20ID:.ASCIZ ‘DELUA PHYSICAL ADDRESS ' 

061057 125 101 040 

061062 120 110 131 

061065 123 111 103 

061070 101 114 040 

061073 101 104 104 

061076 122 105 123 

061101 123 040 000 
8872 EVEN 
8873 
8874 061104 ENDTST 

061104 L10052: 

TRAP CSETST 


061104 104401 
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061106 
061106 


061106 


061106 
061112 


061116 
061122 
061124 
061132 
061140 
061144 
061146 


061146 
061152 


065006 ‘ 
032734' 


033434' 
004100 


000140 
027736‘ 


026652‘ 





117072 
117064 


SEQ 277 





-SBTTL TEST 21: MULTICAST ADDRESS TEST 


FRRSAARERESESAEASEEAAEEEEEAEAEEESEEEEEEEREAEEEEEEAAEEAEEAEAAEAEKELESEAEEE 


THIS TEST VERIFIES THAT MULTICAST ADDRESSING 

IS OPERATIONAL. 

A WRITE MULTICAST ADDRESS LIST FUNCTION IS USED TO SET 
THE DELUA’S MULTICAST ADDRESS LIST. 

INTERNAL LOOPBACKS ARE THEN PERFORMED WITH 

CURRENTLY ENABLED AND THEN CURRENTLY DISABLED 

MULTICAST DESTINATION ADDRESSES. 

THE MULTICAST ADDRESS LIST IS THEN COMPLEMENTED AND THE 
TEST IS REPEATED. 


TEST ed 
WRITE MODE REGISTER = INTERNAL LOOPBACK 
WRITE RING FORMAT 
WRITE PHYSICAL ADDRESS 
WRITE MULTICAST ADDRESS LIST 
SET UP RINGS AND BUFFERS 
WITH —— ADDRESS = MULTICAST ADDRESS 


oan UI WiTy 
H 
2 


- 
oO- 


SUE 
REPEAT STEPS 5 - 8 FOR ALL TEN LIST ENTRIES 
SET UP RINGS AND BUFFERS 

WITH ae ADDRESS = COMPLIMENTED MULTICAST ADDRESS 


ry 
; 
; 
; 
; 
; 
: 
: 
; 
: 
; 
5 
; 
4 
12. CHECK FOR NO RXI 
; 

; 

; 


13. ISSUE STOP 
14. REPEAT STEPS 10 - 13 FOR ALL TEN ENTRIES 
15. WRITE MULTICAST ADDRESS LIST WITH COMPLEMENTED VAULES 
16. REPEAT STEPS 5 - 14 
£bh44 460440646040 06 666460664664 666460660660604666444060664646660466464640646444464444644% 
BGNTST 
T21i:: 
PNTMAC T21ID 
MOV #T21ID ,.R4 ;GET POINTER TO TEST NAME MESSAGE 
JSR PC .PNTID sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 30$ ; NO 
MOV #ONI P INTE, SPCSRO ; ENABLE INTERRUPTS 
MOVB #INTE!RSET,@PCSRO ; YES, RESET DELUA 
JSR PC ,CKDNI ; ONI ? 
BCC 20$ ; YES 
FTL 
JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
ERRHRD 363. ,ERROO6,MSGOOS ; NO, REPORT ERROR 











TT 
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8948 


061166 


061172 
061174 


061174 


104456 
000553 
023030' 
021736' 


104410 
003654 


004737 
103010 


004737 


030264 ' 


026652' 


030212' 
031732' 


030264' 


026652’ 


H 
20$: 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 


TST 


PC ,CLRONI 
30$ 


PC ,CHKFTL 
364. ,ERRCO6,MSGOOS 


TST 


PC ,.CLRBUF 
AL 


»LOPCSR 
#DNI! INTE, BPCSRO 
#INTE!GETPCB ,,.@PCSRO 
PC DNI 


PC .CHKFTL 
365. ,ERROO9, MSGOOS 


PC ,CHKFTL 


ERRHRD 366. ,ERROO6,MSGO0S 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
— ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
-WORD 

AND ABORT TEST 
TRAP 
-WORD 


CLEAR TBUF AND RBUF 





SEQ 278 
CSERHRD 
363 
ERROO6 


CSESCAPE 
L10053-. 


LOAD DEFAULT PHY.ADDRESS TABLES 


INTERRUPTS 
ISSUE GET_PCBB PORT COMMAND 
DNI? 
YES 
‘FATL’ BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 


‘FATL' BIT SET? 

YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 


CSERHRD 
366 
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8949 


8982 


EL 


061314 
061314 
061316 


061474 
061474 


104410 
003522 


012705 


004737 


103010 


004737 


000102 
026550’ 


026652’ 


030264' 


026652’ 


026652 ' 


000302‘ 
116660 
116652 


116544 
116536 


: 
;WRITE MODE REGISTER = INTERNAL LOOPBACK 
50$: 


ESCAPE 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


TST 


@WTMODE ,RS 

PC ,LDOPCBB 

MODE21 ,PCBB+2 

#DNI! INTE, @PCSRO 
#INTE!GETCMD ,@PCSRO 
na 


PC ,CHKFTL 
367. ,ERRO1LO,MSGO03 


TST 


PC ,CLRONI 
70$ 


PC .CHKFTL 
370. ,ERROO6, MSGOO0S 


TST 


WRITE RING FORMAT 


70$: 


@WTRNGS RS 
PC ,LDPC8B 


PC ,LDUDBB 

@DNI! INTE, @PCSRO 
#INTE!GETCMD , @PCSRO 
2 tata 


PC ,CHKFTL 





; AND ABORT TEST 


TRAP 
- WORD 


DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 

MODE = INTL LOOPBACK ONLY 
ENABLE INTERRUPTS 

oh ge GET_CMD PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
-WORD 
-WORD 
AND ABORT TEST 
TRAP 


WRITE ONE TO CLEAR ONI 
~ ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 





SEQ 279 


CSESCAPE 
L10053-. 


CSERHRD 
367 
ERRO10 
MSGO03 


CSESCAPE 
L10053-. 


DEFAULT WRITE ag A al FUNCTION 


LOAD FUNCTION -> P 
DEFAULT RING FORMAT 
FORMAT = SIX WORDS 


ISSUE GET_CMD PORT COMMAND 
ONI ? 
YES 


‘FATL' BIT SET? 
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8983 061500 
06 


104456 
000563 
023331' 
021736’ 


104410 
003326 


004737 
103010 


004737 


104456 
000564 
023030' 
021736‘ 


104410 
003300 


012705 
004737 
012705 
004737 
012777 
112777 
004737 
103010 


004737 


030264 ' 


026652’ 


000272’ 
032050' 
012500’ 
032002' 


004100 116434 
000102 116426 


026550' 


026652’ 


.030264 ' 


026652’ 


i 
;WRITE PHYSICAL 


90$: 


; 
100$: 


ERRHRD 


ESCAPE 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 


371. ,ERRO1O,MSGOO03 


TST 
PC ,CLRONI 
90$ 


PC ,CHKFTL 


372. ,ERROO6 ,MSGO03 


TST 


PC ,.LDPCBB 

@ONI ! INTE, @PCSRO 
@INTE!GETCMD ,SPCSRO 
PC ,CHKONI 

100$ 

PC .CHKFTL 


373. .ERRO10,MSGOO0S 


TST 


PC ,CLRONI 
102$ 


PC ,CHKFTL 


ERRHRD 374. ,ERROO6,MSGOO0S 


NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 371 
-WORD ERROLO 
-WORD MSGOO03 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD 110053-. 


= ONE TO CLEAR DNI ERROR? 


‘FATL’ BIT SET? 


YES, REPORT ERROR 
TRAP CSERHRD 
372 


. WORD 

-WORD MSGOOS 
AND ABORT TEST 

TRAP CSESCAPE 

-WORD 1L10053-. 


GET DEFAULT PHYSICAL ADDRESS 
SAVE IN DEFAULT TABLE 

DEFAULT WRITE PHYSICAL ADDR FUNC 
LOAD FUNCTION -> PCBB 

ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 

DNI ? 

YES 

‘FATL’' BIT SET? 

NO, REPORT ERROR 


TRAP CSERHRD 
-WORD 273 
-WORD ERRO1O 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10053-. 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
AP CSERHRD 
.WORD 374 





ee 





HARDWARE TESTS MACRO YOS.02 Friday 12-Jul-85 09:33 Page 112-4 


TEST 21: MULTICAST ADDRESS TEST 


023030' 
021736' 


104410 
003170 


012705 


9044 062006 
9045 062012 


= ae 


012520' 


000102 
026550° 


026652 ' 


036264’ 


026652' 


000012 
016074 ' 
000272’ 
033206 ' 


014410’ 
032164' 


116320 
116312 


; 
104$: 


; 
3D0 TEN 


$ 
106$: 


; 
;SET UP 
110$: 


ESCAPE TST 


;WRITE MULTICAST ADDRESS LIST 
1028: 


MOV MWTMULA,&S 

JSR PC ,LOPCBB 

MOV @MULTL .RS 

MOV #30. ,RO 

JSR PC ,LDUDBB 

MOV @ONI! INTE, @PCSRO 
MOVB #INTE!GETCMD ,@PCSRO 
JSR PC ,CHKONI 

BCC 104$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 375. ,ERRO10,MSGO0S 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 106$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 376. ,ERROO6.MSGOOS 
ESCAPE TST 


TS TS TT NT cL 


TRAP 
- WORD 


AND ABORT TEST 





SEQ 281 
ERROO6 
MSGOO03 


CSESCAPE 
L10053-. 


DEFAULT WRITE MULTICAST ADDR FUNC 


LOAD FUNCTION -> PCBB 

LOAD LIST INTO UDBB 

LOAD 30 ENTRIES 

MULTICAST LIST -> UDBB 
ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 
ONI ? 

YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


_ ONE TO CLEAR DNI ERROR? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


LOOPS WITH DEST ADOR = MULTICAST ADDRESS 


MOV #10. .R4 

MOV @MUL TL .R2 

MOV @OFAULT,R1 

JSR PC ,SRCDST 

RINGS FOR ONE BUFFER LOOPBACK 
MOV #TORB1A,RS 

JSR PC ,LOTORB 


DO LOOP = TEN 

R2 POINTS TO MULTICAST LIST 
SOURCE = PHYSICAL ADDRESS 
STORE THIS IN TABLES 


DEFAULT ONE BUFFER TRANSMIT RING 


LOAD TORB 
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9075 


012705 
004737 


012701 
004737 


MULTICAST ADDRESS 


012750' 
032070' 


026652 ' 


030264 ' 


026652’ 


027566 ' 


026652’ 


016560‘ 


116142 
116134 


: 
;SET UP 


; 
120$: 


é 
130$: 


MOV 
JSR 


BUFFERS 


ESCAPE 


JSR 
BCC 
FTL 
JSR 


ERRHRD 


ESCAPE 


#RORB1A,RS 
PC ,LORDORB 


AND START 


@DF AULT, Ri 
PC ,SRCDOST 
DOCR 


#ONI! INTE, @PCSRO 
#INTE! START, SPCSRO 
PC ,CHKONI 

120$ 


PC ,CHKFTL 
377. ,ERRO12,MSGO03 


TST 


PC ,CLRONI 
130$ 


PC ,CHKFTL 
380. ,ERROOG , MSGOO3 


TST 
PC ,.CHKTXI 
140$ 


PC ,CHKFTL 
381. ,ERRO13,MSGOO0S 


TST 


ae 





SEQ 282 


; DEFAULT ONE BUFFER RECEIVE RING 


LOAD RORB 


POINT TO SOURCE ADDRESS 
R2 IS tenes ADR LIST POINTER 


NO CRC A 
BYTES/PACKET 

SET UP BUFFERS 
ENABLE INTERRUPTS 


ISSUE START PORT COMMAND 
ONI? 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


TXI ? 
YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


CSERHRD 
381 
ERROI3 
MSGOO3 


CSESCAPE 
L10053-. 

















~_— < 
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SEQ 283 


9076 ; 
9077 062172 004737 030500‘ 140$: JSR PC .CLRTXI ; WRITE ONE TO CLEAR TXI ERROR? 
9078 062176 103010 BCC 150$ ; NO 
9079 062200 FTL 
062200 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
9080 062204 ERRHRD 382. ,ERRO14,MSGO003 ; YES, REPORT ERROR 
062204 104456 bp CSERHRD 
062206 000576 D 2 
062210 023561' -WORD ERROI4 
062212 021736’ -WORD MSGO003 
9081 062214 ESCAPE TST ; AND ABORT TEST 
062214 104410 TRAP CSESCAPE 
onne 062216 002622 L10053-. 
; 
9083 062220 012705 000620' 150$: MOV @TORB,RS ; CHECK TORB OWNERSHIP 
062224 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER 7 
9085 062230 103010 BCC 160$ ; YES 
9086 062232 FTL 
062232 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9087 062236 ERRHRD 383. ,ERRO18 ; NO, REPORT ERROR 
062236 104456 TRAP CSERHRD 
062240 000577 -WORD 383 
062242 024026' -WORD ERROIS 
062244 -WORD OO 
9088 062246 ESCAPE TST : AND ABORT TEST 
062246 104410 TRAP CSESCAPE 
_— 062250 002570 -WORD L10053-. 
3 
9090 062252 012705 016264’ 160$: MOV @TORI4A,R5 ; POINT TO EXPECTED TORB 
9091 062256 004737 032370’ JSR PC ,LDX ; LOAD INTO XTORBO TABLE 
9092 062262 012705 000620’ MOV #TORB RS ; CHECK TORS 
9093 06 004737 027500° JSR PC ,.CHKTDOR ; ERRORS ? 
9094 062272 103010 BCC 170$ 3; NO 
9095 062274 FTL 
062274 004737 026652’ JSR PC ,CHKFTL ; 'FATL’ BIT SET? 
9096 062300 ERRHRD 384. ,ERRO20,MSGOO0S ; YES, REPORT ERROR 
062300 104456 
062302 
062304 024206' 
062306 022042' 
9097 062310 ESCAPE TST ; AND ABORT TEST 
062310 104410 
062312 002526 
; 
9099 062314 004737 027316' 1708: JSR PC ,.CHKRXI ; RXI 7? 
9100 062320 103010 BCC 180$ ; YES 
9101 062322 FTL 
062322 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
9102 062326 ERRHRD 385. ,ERRO15,MSGOO3 ; NO, REPORT ERROR 








ES ES OE TE TT 
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062326 104456 TRAP § CSERHRO 
062330 000601 “WORD 385 
062332 023627' .WORD ERROIS 
062334 021736’ 3 
9103 062336 ESCAPE TST ; AND ABORT TEST 
062336 104410 TRAP CSESCAPE 
iden 062340 002500 WORD «| S008 -. 
: 
9105 062342 004737 030432' 180$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
9106 ; ERROR ? 
9107 062346 103010 BCC 1908 ; NO 
9108 062350 FTL 
062350 004737 026652’ JSR PC ,.CHKFTL ; ‘'FATL’ BIT SET? 
9109 062354 ERRHRD 386. ,ERRO16,MSGOO3 ; YES, REPORT ERROR 
062354 104456 TRAP § CSERHRD 
062356 000602 “WORD 386 
062360 023660’ .WORD  ERROI6 
062362 021736’ . WORD 
9110 062364 ESCAPE TST ; AND ABORT TEST 
062364 104410 TRAP CSESCAPE 
ial 062366 002452 -WORD 110053-. 
é 
9112 062370 012705 000660' 190$: MOV @RORB, RS ; CHECK RORB OWNERSKIP 
9113 062374 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
9114 062400 103010 BCC 2008 ; YES 
9115 062402 FTL 
062402 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9116 0624 ERRHRD 387. ,ERRO17 ; NO, REPORT ERROR 
062406 104456 TRAP § CSERHRD 
062410 000603 .WORD 387 
062412 023726' .WORD ERROI7 
062414 .WORD 0 
9117 062416 ESCAPE TST ; AND ABORT TEST 
062416 104410 TRAP = CSESCAPE 
Pie 062420 002420 .WORD 1L10053-. 
i 
9119 062422 012705 016454° 200$: MOV @ROR2OC RS ; POINT TO EXPECTED RORB 
9120 062426 004737 032340' JSR PC ,LOXROR ; LOAD INTO XRORBO TABLE 
9121 062432 012705 000660' MOV @RORB RS ; CHECK RORB 
9122 062436 004737 027206' JSR PC ,CHKRDR ; ERRORS ? 
9123 062442 103010 BCC 210$ ; NO 
9124 062444 FTL 
062444 004737 026652' JSR PC,.CHKFTL ; ‘FATL' BIT SET? 
9125 062454 ERRHRD 390. ,ERRO21,MSG006 ; YES, REPORT ERROR 
062450 104456 TRAP § CSERHRD 
062452 060606 .WORD 390 
062454 024247' .WORD ERRO21 
062456 022204' .WORD MSGO06 
9126 062460 ESCAPE TST ; AND ABORT TEST 
062460 104410 TRAP CSESCAPE 
062462 002356 .WORD 1L10053-. 
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‘- 


9130 062464 
9131 062470 
9132 062474 
9133 062476 
062476 
2500 


9148 062562 
062562 
9149 062566 
062566 


9154 062606 
9155 062610 


062610 
9156 062614 
062614 
062616 
062620 


016560’ 
030712° 


006472' 
030642’ 


004100 
000117 
026550‘ 


026652’ 


030264 ' 


026652’ 


115456 
115450 


; 
;COMPARE RBUF WITH TBUF 


210%: 


5 
2208: 


3 
2308: 


: 
2405: 


MOV 
JSR 


BCC 
ERRHRD 


ESCAPE 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


BYTCNT RS 
PC .CMPDAT 


220% 
391. ,ERRO22,MSGO007 
TST 


@RBUF +26. ,R5 
MPCRC 


230% 
392. ,ERRO23,MSGO08 
TST 


@ONI! INTE , @PCSRO 
#INTE! STOP ,@PCSRO 
PC ,CHKDONI 

240% 


PC ,.CHKFTL 


393. ,ERRO19,MSGOOS 


TST 
PC ,.CLRONI 
245% 


PC ,CHKFTL 
394. ,ERROO6 .MSGOO0S 





COMPARE DATA 
DATA COMPARE ERROR 7? 


NO 
YES, REPORT ERROR 


TRAP 
- WORD 
-WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK CRC 
ERRORS 7? 
NO 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
.WORD 


sENABLE INTERRUPTS 


ISSUE STOP PORT COMMAND 
ONI ? 
YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 
WRITE ONE TO CLEAR ONI 
-* 


‘FATL' BIT SET? 
YES, REPORT ERROR 





SEQ 285 
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SEQ 286 


062622 021736’ -WORD MSGO003 
2157 062624 ESCAPE TST ; AND ABORT TEST 
052624 104410 TRAP CSESCAPE 
062626 002212 -WORD 1L10053-. 
9158 ; 
9159 062630 2453: 
9160 062630 004737 030236‘ JSR PC ,CLRCV ; CLEAR RECEIVE BUFFER 
9161 062634 062702 000006 ADD 06 ,R2 ; UPDATE R2 
9162 062640 062703 000004 ADD #4,R3 ; UPDATE R3 
9163 062644 005304 DEC R4 ; DONE TEN LOOPBACKS? 
9164 062646 001402 BEQ 246$ ; YES 
9165 062650 000137 062006’ JMP 110$ ; NO 
9166 : 
9167 3 
a. ;D0 TEN LOOPS WITH DEST ADDRESS = COMPLIMENTED MULTICAST ADDRESS 
3 
9170 
9171 062654 012704 000012 2468: MOV #10. ,R4 ; DO LOOP = TEN 
et 062660 012702 016170' MOV #MULTLC ,R2 ; R2 POINTS TO COMPLIMENTED LIST 
: 
jg ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
1 
9176 062664 012705 014410° 250$: MOV #TDRBIA,RS ; DEFAULT ONE BUFFER TRANSMIT RING 
9177 062670 004737 032164° JSR PC ,LOTORB ; LOAD TORB 
9178 062674 012705 012750’ MOV @RDRB1LA,RS ; DEFAULT ONE BUFFER RECEIVE RING 
po 062700 004737 032070' JSR PC ,LDORORB ; LOAD RDRB 
1 : 
ates ;SET UP BUFFERS AND START 
1 
9183 062704 012701 000264’ MOV @SRC .R1 ; SOURCE = PHY ADDR 
9184 062710 004737 033206’ JSR PC ,SRCDOST ; DEST = COMPLIMENTED MULTICAST ADDR 
9185 062714 005037 016562° CLR DOCRC ; NO APPEND CRC 
9186 062720 012737 9000006 016560° MOV 96 .BYTCNT ; BYTES/PACKET 
9187 062726 004737 033006’ JSR PC ,SETBUF ; SET UP BUFFERS 
9188 062732 012777 004100 115264 MOV @ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 
9189 062740 112777 000104 115256 MOVE SINTE!START, @PCSRO ; ISSUE START PORT COMMAND 
9190 062746 004737 026550' JSR PC ,.CHKONI ; DONI? 
9191 062752 103010 BCC 260$ ; YES 
9192 062754 FTL 
062754 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9193 062760 ERRHRD 395. ,ERRO12,MSGO0S ; NG, REPORT ERROR 
062760 104456 TRAP CSERHRD 
062762 000613 -WORD 395 
062764 023447' -WORD ERROI2 
062766 021736' -WORD MSGOO3 
9194 062770 ESCAPE TST ; AND ABORT TEST 
062770 104410 TRAP CSESCAPE 
eneis 062772 002046 -WORD L10053-. 
9196 062774 004737 030264’ 260$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
9197 ; ERROR ? 
9198 063000 103010 BCC 270$ ; NO 
9199 063002 FTL 
063002 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
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9221 


9222 


103010 


004737 


104456 
000620 
023561’ 
021736’ 


104410 
001744 


012705 
004737 
103010 


004737 


104456 
000621 
024026 ' 
000000 


104410 
001712 


027566‘ 


026652’ 


030500‘ 


026652 ' 


000620' 
027024’ 


026652’ 


2708: 


2803: 


290$: 


ERRHRD 396. ,ERROO6,MSGO0S 


ESCAPE TST 


JSR PC ,CHKTXI 
BCC 280$ 
FTL 


JSR PC ,CHKFTL 
ERRHRD 397. ,ERRO13,MSGO03 


ESCAPE TST 


JSR PC .CLRTXTI 
BCC 290% 


JSR PC .CHKFTL 
400. ,ERRO14,MSGO03 


ESCAPE TST 


MOV $TORB.RS 
JSR PC ,CHKOWN 
300$ 


JSR PC ,CHKFTL 
401. ,ERRO18 


ESCAPE TST 





YES, REPORT ERROR 


RAP 
. WORD 
-WORD 
. WORD 
AND ABORT TEST 
TRAP 
* WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR TXI 
a ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK TDORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. RORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 





SEQ 287 


CSERHRD 
396 
ERROOG6 
MSGO03 


CSESCAPE 
L10053-. 


CSERHRD 
397 
ERRO13 
MSGO003 


CSESCAPE 
L10053-. 


CSERHRD 
400 


ERRO14 
MSGOOS 


CSESCAPE 
L10053-. 


CSERHRD 
401 
es 


CSESCAPE 
L1i0053-. 
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SEQ 288 


9223 063130 012705 016344’ 300$: MOV @TOR21X,R5 ; POINT TO EXPECTED TORB 
9224 063134 004737 032370’ JSR PC ,LDOXTOR ; LOAD INTO XTORBOC TABLE 
9225 063140 012705 000620’ MOV @TORB,RS ; CHECK TORB 
9226 063144 004737 027500' JSR PC ,CHKTOR ; ERRORS ? 
9227 063150 103010 BCC 310$ : 
9228 063152 FTL 
063152 004737 026652’ JSR PC ,.CHKFTL ; '‘FATL’ BIT SET? 
9229 063156 ERRHRD 402. ,ERRO20,MSGO05 ; YES, REPORT ERROR 
063156 104456 TRAP CSERHRD 
063160 000622 -WORD 402 
063162 024206’ -WORD ERROZO 
063164 022042’ -WORD MmSGOO5 
9230 063166 ESCAPE TST ; AND ABORT TEST 
063166 104410 TRAP CSESCAPE 
_— 063170 001650 -WORD 1£110053-. 
9232 063172 004737 032422’ 310$: JSR PC ,NORXI ; RXI ? 
9233 063176 103010 Bcc 320$ ; NO 
9234 0632 FTL 
063200 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9235 063204 ERRHRD 403. ,ERRO39 ; YES, REPORT ERROR 
063204 104456 TRAP CSERHRD 
063206 000623 -WORD 403 
063210 025575' -WORD ERROS9 
063212 900000 -WORD 0 
9236 063214 ESCAPE TST ; AND ABORT TEST 
063214 104410 TRAP CSESCAPE 
063216 001622 -WORD 1L10053-. 
9237 3 
9238 063220 3208: 
9239 063220 012777 004100 114776 MOV #DNI! INTE, @PCSRO ; ENABLE INTERRUPTS 
9240 063226 112777 000117 114770 MOVB #INTE! STOP ,aPCSRO ; ISSUE STOP PORT COMMAND 
9241 063234 004737 026550’ JSR PC ,.CHKDNI ; DNI ? 
9242 063240 103010 BCC 330$ ; YES 
9243 063242 FTL 
063242 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9244 063246 ERRHRD 404. ,ERRO19,MSGOO03S ; NO, REPORT ERROR 
3246 104456 TRAP CSERHRD 
063250 000624 -WORD 404 
063252 024126’ -WORD ERROI9 
3254 021736' -WORD MSGOO3 
9245 063256 ESCAPE TST ; AND ABORT TEST 
3256 104410 TRAP CSESCAPE 
nee 063260 001560 -WORD 1L10053-. 
9247 063262 004737 030264’ 330$: JSR PC ,.CLRDNI ; WRITE ONE TO CLEAR ONI 
9248 ; ERROR ? 
9249 063266 103010 BCC 335$ ; NO 
9250 063270 FTL 
063270 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 











— 
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9251 063274 ERRHRD 405. ,ERROO6,MSGO0S ; YES, REPORT ERROR 
063274 104456 TRAP CSERHRD 
063276 000625 -WORD 405 
063300 023030’ -WORD ERROOE 
063302 021736’ -WORD MSGO03 
9252 063304 ESCAPE TST ; AND ABORT TEST 
063304 104410 TRAP CSESCAPE 
063306 001532 -WORD 110053-. 
9253 ; 
9254 063310 335$: 
9255 063310 004737 030236’ JSR PC ,.CLRCV ; CLEAR RECEIVER 
9256 063314 062702 000006 ADD 06 ,R2 ; UPDATE R2 
9257 063320 005304 DEC R4 ; DONE 10 LOOPBACKS? 
9258 063322 001402 BEQ 340$ ; YES, EXIT LOOP 
oaks 063324 000137 062664’ JMP 250$ ; NO, LOOP AGAIN 
wae ;REPEAT WITH COMPLEMENTED MULTICAST ADDRESS LIST 
3 
pan sWRITE MULTICAST ADDRESS LIST 
9265 063330 3408: 
9266 063330 012705 012520' MOV #WTMULA,RS5 ; DEFAULT WRITE MULTICAST ADDR FUNC 
9267 063334 004737 032002’ JSR PC ,LOPCBB ; LOAD FUNCTION -> PCBB 
9268 063340 012705 016170’ MOV #MULTLC,RS ; LOAD LIST INTO UDBB 
9269 063344 012700 000036 MOV #30. ,.RO ; LOAD 30 ENTRIES 
9270 063350 004737 032260' JSR PC ,LDUDBB ; MULTICAST LIST -> UDBB 
9271 063354 012777 004100 114642 MOV @DNI! INTE, 8PCSRO ; ENABLE INTERRUPTS 
9272 063362 112777 000102 114634 MOVB @INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
9273 063370 004737 026550’ JSR PC ,CHKDNI ; ONI ? 
9274 063374 103010 BCC 350$ ; YES 
9275 063376 FIL 
063376 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9276 063402 ERRHRD 406. ,ERRO10,MSGOOS ; NO, REPORT ERROR 
063402 104456 TRAP CSERHRD 
063404 000626 -WORD 406 
063406 023331' -WORD ERROIO 
063410 021736' -WORD MSGOO3 
9277 063412 ESCAPE TST ; AND ABORT TEST 
063412 104410 TRAP CSESCAPE 
_— 063414 001424 -WORD L10053-. 
9279 063416 004737 030264’ 350$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
9280 ; ERROR ? 
9281 063422 103010 BCC 355$ ; NO 
9282 063424 FTL 
063424 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9283 063430 ERRHRD 407. ,ERROO6,MSGO03 ; YES, REPORT ERROR 


9254 063440 ESCAPE TST AND ABORT TEST 
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063440 
063442 


104410 
001376 


000012 
016170’ 


014410° 
032164' 
012750' 
032070' 


030264’ 


026652 ' 


027566’ 


016560’ 


114474 
114466 








SEQ 290 
TRAP CSESCAPE 
-WORD 1L10053-. 


; 
;00 TEN LOOPS WITH DEST ADDR = NEW COMPLEMENTED MULTICAST ADDRESS 


; 
355$: 


; 
;SET UP 


360$: 


: 
;SET UP 


; 
370$: 


MOV 
MOV 


RINGS FOR ONE BUFFER LOOPBACK 


ESCAPE 


JSR 


#10. ,R4 
@MULTLC,R2 


#TDORB1A,RS 
PC ,LDTORB 
#RDRB1A,RS 
PC ,LDRORB 
AND START 


#SRC ,R1 
PC ,SRCOST 


@DNI! INTE. @PCSRO 
#INTE!START,@PCSRO 
PC ,CHKONI 

370$ 


PC ,CHKFTL 
410. ,ERRO12,MSGO03 


TST 


PC ,CLRONI 
380$ 


PC .CHKFTL 
411. ,ERROO6,MSGOO0S 


TST 


PC ,CHKTXI 


DO LOOP = TEN 
R2 = COMPLIMENTED ADDRESS LIST 


DEFAULT ONE BUFFER TRANSMIT RING 
LOAD TORB 
DEFAULT ONE BUFFER RECEIVE RING 
LOAD RDRB 


SOURCE = PHYSICAL ADDRESS 

R2 = NEW COMPLIMENTED MULTICAST ADR 
NO APPEND CRC 

BYTES/PACKET 

SET UP SUFFERS 

ENABLE INTERRUPTS 

a STPRT PORT COMMAND 


YES 


‘FAT'.' BIT SET? 
NO, REPORT ERROR 


TRAP CSERHRD 
-WORD 410 
-WORD ERROI2 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10053-. 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
RAP CSERHRD 
-WORD 411 
-WORD ERROOG 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10053-. 


TXI ? 
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9322 063616 
9323 063620 


103010 


004737 


026652‘ 


030500’ 


026652 ' 


000620’ 
027024' 


026652‘ 


f 
3903: 


410$: 


BCC 
FTL 
JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


390$ 


PC ,CHKFTL 
412. ,ERRO13,MSGO03 


TST 
PC ,CLRTXI 
400$ 


PC ,CHKFTL 
413. ,ERRO14,MSGO03 


TST 


#TORB,RS 
PC ,CHKOWN 
410$ 


PC ,.CHKFTL 
414. ,ERRO18 


TST 


#TOR14A,R5 
PC ,LOXTOR 


PC ,CHKFTL 
415. ,ERRO20,MSGOO05 


YES 


‘FATL’ BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR TXI 


ERROR ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


CHECK TDORB OWNERSHIP 


OWN = PORT DRIVER ? 
YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 





TRAP 
. WORD 


POINT TO EXPECTED TDRB 
LOAD INTO XTORBO TABLE 


CHECK TDORB 
ERRORS ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 


SEQ 291 


CSERHRD 
412 
ERRO13 
MSGO03 


CSESCAPE 
L10053-. 


CSERHRD 





-_ 
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9352 063770 
063770 
9353 063774 


9354 064004 
9355 
9356 064010 
9357 
9358 064014 
9359 064016 


064016 


9372 064100 


ae 
EO 


000637 


024206 ' 
022042 ' 


104410 
001060 


004737 
103010 


004737 


027316' 


026652 ' 


030432’ 


026652 ' 


4203: 


4303: 


3 
450$: 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


Pape. 
TST 
PC ,CHKRXI 
430$ 
PC ,CHKFTL 
416. ,ERRO15,MSGO03 


TST 


PC ,.CLRRXT 


440$ 


PC ,CHKFTL 
417. ,ERRO16,MSGOO0S 


TST 


#RORB RS 
PC ,CHKOWN 
450$ 

PC ,CHKFTL 


420. ,ERRO17 


TST 


#RDR2OC, RS 
PC ,LOXROR 
#RORB RS 





. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
RXI ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
WRITE ONE TO CLEAR RXI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
CHECK RDRB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED RDORB 
LOAD INTO XRDORBO TABLE 
CHECK RDRB 





CSESCAPE 
L10053-. 


CSESCAPE 
L10053-. 





HARD 


WARE TESTS 


9373 064104 
9374 064110 
9375 064112 

064112 


9376 064116 
16 
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004737 
103010 


004737 


104456 
000645 
024267' 
022204’ 


104410 
000710 


013705 
004737 
103006 
104456 


000646 
024350’ 
022346’ 


104410 
000662 


012705 


027206 ' 


02665 ’ 


JSR PC ,CHKRDR 
BCC 460$ 

FTL 
JSR 


ERRHRD 


PC ,CHKFTL 
421. ,ERRO21,MSGO006 


ESCAPE TST 


i 
;COMPARE RBUF WITH TBUF 


016560’ 460$: 


030712‘ 


: 
470$: 
006472’ 
030642 ' 


3 
480$: 


004100 114010 
000117 114002 
026550’ 


026652’ 


MOV BYTCNT,RS 

JSR PC ,.CMPDAT 

BCC 470$ 

ERRHRD 422. ,ERRO22,MSG007 
ESCAPE TST 

MOV @RBUF +26. ,R5 

JSR PC ,CMPCRC 

BCC 480$ 

ERRHRD 423. ,ERRO23,MSGO0S8 
ESCAPE TST 

MOV @DNI ! INTE ,@PCSRO 
MOVB #INTE!STOP ,@PCSRO 
JSR PC ,CHKDNI 

BCC 4903 

FTL 

JSR PC ,CHKFTL 


ERRHRD 424. ,ERRO19,MSGOOS 


ESCAPE TST 





ERRORS 7? 
NO 
‘'FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
COMPARE DATA 
_ COMPARE ERROR 7 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK CRC 
ERRORS ? 
NO 
YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


ENABLE INTERRUPTS 
> a STOP PORT COMMAND 


YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


SEQ 293 


CSERHRD 
421 
ERRO21 
MSG006 


CSESCAPE 
L10053-. 














hE 
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064244 104410 TRAP  C9ESCAPE 
064246 000572 WORD 110053-. 
; 
9403 064250 004737 030264’ 4908: JSR PC ,CLRONI WRITE ONE TO CLEAR ONI 
; 
9405 064254 103010 BCC 495% ; NO 
9406 064256 FTL 
064256 004737 026652' JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
9407 064262 ERRHRD 425. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
064262 104456 TRAP § CSERHRD 
064264 000651 -WORD 425 
023030' .WORD ERROOG 
064270 021736’ .WORD MSGOO3 
9408 064272 ESCAPE TST ; AND ABORT TEST 
064272 104410 TRAP CSESCAPE 
064274 -WORD 10053-. 
; 
9410 064276 495s: 
9411 064276 004737 030236’ JSR PC, CLRCV ; CLEAR RECEIVE BUFFER 
9412 064302 062702 000006 ADD »R2 ; UPDATE R2 
9413 064306 062703 000004 ADD 04,R3 ; UPDATE R3 
9414 064312 005304 DEC R4 : DONE TEN LOOPBACKS ? 
9415 064314 001402 BEQ 496$ ; YES 
9416 064316 000137 063454' JUMP 360% ; NO 
‘ 
9418 ;D0 TEN LOOPS WITH DEST ADDR = COMPLIMENT OF NEW COMPLIMENTED ADDRESS LIST 
6 
9421 064322 012704 000012 496$: MOV #10. .R4 ; DO LOOP = TEN 
9422 064326 012702 016074' MOV @MULTL .R2 ; POINT TO MULTICAST LIST 
° 
gas ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
9426 064332 012705 014410’ 500: MOV @TORB1A,RS ; DEFAULT ONE BUFFER TRANSMIT RING 
9427 064336 004737 032164’ JSR PC ,LOTDRB ; LOAD TORS 
9428 064342 012705 012750’ MOV @RDRB1A, RS ; DEFAULT ONE BUFFER RECEIVE RING 
9429 064346 004737 032070' JSR PC ,LORORB ; LOAD RORB 
3 
e431 ;SET UP BUFFERS AND START 
9433 064352 012701 64! MOV @SRC,R1 ; SOURCE = PHYSICAL ADDRESS 
9434 064356 004737 033206’ JSR PC,SRCDST ; R2 = COMPLIMENT DESTINATION ADDR 
9435 064362 37 016562" CLR DOCRC ; NO APPEND CRC 
9436 064366 012737 016560' MOV #6 ,BYTCNT ; BYTES/PACKET 
9437 064374 004737 033006' JSR PC, SETBUF ; SET UP BUFFERS 
9438 064400 012777 004100 113616 MOV #ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 
9439 064406 112777 000104 113610 MOVB #INTE!START, OPCSRO ; ISSUE START PORT COMMAND 
9440 064414 004737 026550' JSR PC ,CHKDNI ; ONI? 
9441 064420 103010 BCC 5108 ; YES 
9442 064422 FTL 
064422 004737 026652' JSR PC, CHKFTL ; ‘FATL' BIT SET? 
9443 064426 ERRHRD 426. ,ERRO12,MSGO03 ; NO, REPORT ERROR 
064426 104456 TRAP § CSERHRD 
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000652 
023447' 
021736’ 
104410 
000400 
004737 
103010 


030264’ 


026652 ' 


027566 ‘ 


026652‘ 


030500’ 


026652’ 


000620’ 
027024’ 


3 
510$: 


; 
5208: 


$ 
5308: 


: 
540$: 


ESCAPE 


JSR 


BCC 
FTL 


TST 


PC ,CLRONI 
520$ 


PC ,CHKFTL 
427. ,ERROO6, MSGO03 


TST 
PC ,CHKTXI 
530$ 


PC ,CHKFTL 
430. ,ERRO13,MSGOO3 


TST 
PC ,CLRTXI 
5408 


PC ,CHKFTL 
431. ,ERRO14,MSGOOS 


ES a LS 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 


i 
; ERROR ? 
NO 


‘FATL' BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
AND ABORT TEST 
TRAP 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR TXI 
r 


‘FATL‘ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


CHECK TORB OWNERSHIP 
we = PORT DRIVER ? 





SEQ 295 


426 
ERRO1L2 
MSGOO3 


CSESCAPE 
L10053-. 
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pee 


9469 064556 


9470 


9479 


9494 


004737 


026652’ 


016344 ' 
032370' 


032422' 


026652 ' 


004100 113330 
000117 113322 


026550’ 


026652 ' 


; 
550$: 


H 
560$: 


; 
5708: 


FTL 
JSR 
ERRHRD 


ESCAPE 


ESCAPE 


PC ,CHKFTL 
432. ,ERRO18 


TST 


#TOR21X,R5 
PC ,LOXTOR 


PC ,CHKFTL 
433. ,ERRO20,MSGOOS 


TST 


PC ,NORXT 
570$ 


PC ,CHKFTL 
434. ,ERRO39 


TST 


@ONI! INTE, BPCSRO 
@INTE! STOP ,@PCSRO 
PC ,CHKDNI 

580% 


PC ,CHKFTL 


ERRHRD 435, ,ERRO19,MSGO0S 





T 


ES LLL ————— 


‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED TORB 
LOAD INTO XTDORBO TABLE 
CHECK TORB 

ERRORS ? 

NO 


‘FATL’' BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
RXI ? 
NO 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


ENABLE INTERRUPTS 
ISSUE STOP PORT COMMANC 
ONI ? 
YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 





SEQ 296 


CSERHRO 
432 
_— 


CSESCAPE 
L10053-. 


CSESCAPE 
L10053-. 
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SEQ 297 


435 
ERRO19 
MSGO03 


CSESCAPE 
L10053-. 


000663 
024126’ 
722 021736’ 


104410 
000112 


ESCAPE TST | ; AND ABORT TEST 


004737 
103010 


004737 


030264’ 


026652’ 


3 
5805: 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


PC ,CLRONI 
590$ 


PC .CHKFTL 
436. ,ERROO6 , MSGOO03 


As = TO CLEAR ONI 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


ESCAPE TST ; AND ABORT TEST 


; 
5903: 
030236' CLEAR RECEIVE BUFFER 
000006 UPDATE R2 
DONE TEN LOOPBACKS ? 
; YES, EXIT LOOP 
500$ ; NO, LOOP AGAIN 


PC ,CLINTR s INSURE DELUA INTR BITS CLEAR 


064332’ 
030346' 


9510 064776 6003: 


EXIT TST 
TRAP 
-WORD 


CsExIT 
L10053-. 


; 
;sLOCAL TEST MESSAGE 
T21ID: .ASCIZ ‘DELUA MULTICAST ADDRESS ' 


.EVEN 


ENDTST 
06 ; L10053: 


104401 TRAP 


CsETST 








HARDWARE TESTS 


TEST 22: PROMISCUOUS 


MACRO YOS.02 Fri 
ADORESS MODE 


012777 


071250° 
032734‘ 


033434° 
004100 113136 
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{26600666068 66 66 $6 0606666666646 6664666 8646666466868 6466466666 66666666 6664666666466 


THIS TEST VERIFIES THAT PROMISCUOUS ADDRESSING MODE 

IS OPERATIONAL . 

A WRITE PHYSICAL ADDRESS FUNCTION IS USED TO SET 

THE DELUA'S PHYSICAL ADORE 

A WRITE MULTICAST ADDRESS LIST FUNCTION IS USED TO SET 
THE DELUA'S MULTICAST ADDRESS LIST. 

INTERNAL LOOPBACKS ARE THEN PERFORMED WITH 

CURRENTLY ENABLED AND THEN CURRENTLY DISABLED 
PHYSICAL AND MULTICAST DESTINATION ADDRESSES. 


TEST —— 
WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
WRITE RING FORMAT 
WRITE PHYSICAL ADDRESS 
WRITE MULTICAST ADDRESS LIST 
UP RINGS AND F 


BUFFERS 
WITH DESTINATION ADDRESS = PHYSICAL ADDRESS 


ooo US UIT 
OuaR 
© i 
wm 
~4 
2 
-_ 


SET UP RINGS AND BUFFERS 

WITH DESTINATION ADDRESS NOT = PHYSICAL ADDRESS 
10. ISSUE START 
. CHECK FOR ERRORS 


. ISSVE STOP 

. SET UP RINGS AND BUFFERS 

WITH DESTINATION ADDRESS = MULTICAST ADDRESS 

ISSUE START 

CHECK FOR ERRORS 

ISSUE STOP 

7. REPEAT STEPS 13 - 16 FOR ALL TEN LIST ENTRIES 
SET UP RINGS AND BUF 


FERS 
WITH DESTINATION ADDRESS NOT = MULTICAST ADDRESS 
. ISSUE START 
. CHECK FOR 
21. ISSUE STOP 
22. REPEAT STEPS 18 - 21 FOR ALL TEN ENTRIES 


682666668686 $066 66 660866666 662666246 68 68 E868 65 S5E868 666856666666 6666685 


td ee od od oe 
QU Ca ho = 
s & 


me 
Se 
2 


SS 


BGNTST 
T22:: 
PNTMAC T22ID 
MOV @T22ID .R4 3GET POINTER T0 TEST NAME MESSAGE 
JSR PC .PNTID sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
Bcc 30% ; NO 
MOV @ONI ! INTE , @PCSRO ; ENABLE INTERRUPTS 


SEQ 298 
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9572 065066 
9573 065074 


9574 
9575 


9576 


055100 
065102 


9690 065232 


9601 


ee LA EL 
ee eee 


065234 


112777 
004737 
103010 


004737 


103010 


004737 


104456 
000671 
023245 ' 
021736' 


104410 
004054 


004737 
103010 


enn 


S MODE 


000140 113150 
027736° 


026652’ 


030264 ' 


026652 ' 


030212’ 
031732' 
032032 ' 
004100 
000101 
026550' 


026652’ 


030264’ 


: 
20%: 


2 
40$: 





MOVB 
JSR 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 
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TEST 


GINTE!RSET,@PCSRO 
PC ,.CKDNI 

20% 

PC ,CHKFTL 


437. ,ERROO6,MSGO03 


TST 


PC ,CLRONI 
30$ 


PC .CHKFTL 
440. ,ERROO6.MSGO03 


TST 


PC ,.CLRBUF 

PC ,LDODFLT 

PC .LOPCSR 

@DNI! INTE, @PCSRO 
@INTE!GETPCB ,@PCSRO 
a 


PC ,CHKFTL 
441. ,ERROO9, MSGO03 


TST 


PC ,.CLRONI 
50$ 





YES, RESET DELUA 
DNI ? 


YES 

‘FATL‘ BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 

' - WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 
ERROR ? 


NO 

‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


CLEAR TBUF AND RBUF 





SEQ 299 


CSERHRD 


LOAD DEFAULT PHY.ADDRESS TABLES 


ADDRESS OF PCBB -> PCSR2!3 
ENABLE INTERRUPTS 
ISSUE GE7T_PCBB PORT COMMAND 


DNI? 

YES 

‘FATL’' BIT SET? 

NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR DNI 
ERROR ? 


CSESCAPE 
L10054-. 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
065234 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9602 065240 ERRHRD 442. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
065240 104456 TRAP CSERHRD 
065242 000672 -WORD 442 
065244 023030' -WORD ERROOG 
065246 021736’ WORD MSGO03 
9603 065250 ESCAPE TST ; AND ABORT TEST 
065250 104410 TRAP CSESCAPE 
065252 004026 -WORD L19054-. 
9604 3 
9605 ;sWRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
9607 065254 012705 012600' 50$: MOV @WTMODE ,RS ; DEFAULT WRITE MODE FUNCTION 
9608 065260 004737 032002’ JSR PC ,LOPCBB ; LOAD FUNCTION -> PCBB 
9609 065264 012777 004100 112732 MOV @ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 
9616 065272 112777 000102 112724 MOVB @INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
9611 065300 004737 026550’ JSR PC ,CHKONI ; ONI ? 
9612 065304 103010 Bcc 60$ ; YES 
9613 065306 FTL 
065306 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9614 065312 ERRHRD 443. ,ERRO10,MSGOO03 ; NO, REPORT ERROR 
065312 104456 TRAP CSERHRD 
065314 000673 -WORD 443 
065316 023331’ -WORD ERRO1O 
065320 021736’ -WORD MSGO003 
9615 065322 ESCAPE TST ; AND ABORT TEST 
065322 104410 TRAP CSESCAPE 
_— 065324 003754 -WORD 110054-. 
9617 065326 004737 030264’ 60$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 
9618 ; ERROR ? 
9619 065232 103010 Bcc 70$ : 
9620 065334 FTL 
065334 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9621 065340 ERRHRD 444. ,ERROO6,MSGOO03 ; YES, REPORT ERROR 
065340 104456 TRAP CSERHRD 
065342 000674 . WORD 
065344 023030’ -WORD ERROOG 
065346 021736' -WORD ™SGOO3 
9622 065350 ESCAPE TST ; AND ABORT TEST 
065350 104410 TRAP CSESCAPE 
065352 003726 -WORD Li0054-. 
9623 ; 
oar ;WRITE RING FORMAT 
065354 012705 012540’ 70$: MOV #WTRNGS,RS ; DEFAULT WRITE RING FORMAT FUNCTION 
9627 065360 004737 032002’ JSR PC ,LOPCBB ; LOAD FUNCTION -> PCBB 
9628 065364 012705 012704’ MOV @RFERMT RS ; DEFAULT RING FORMAT 
9629 065370 012700 000006 MOV #6 ,.RO : 
9630 065374 004737 032260’ JSR PC ,LDUDBB : 
9631 065400 012777 004100 112616 MOV #DNI! INTE, @PCSRO 3 
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9632 065406 


9636 


065422 


112777 
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TEST 


000102 112610 


026550 


026652 ' 


030264 ' 


02665e2' 


‘ 
805: 


“WRITE PHYSICAL 


004100 112506 
000102 112500 


026550° 


026652’ 


030264 ' 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


JSR 


#INTE!GETCMD ,@PCSRO 
PC ,CHKONI 
80$ 


PC ,CHKFTL 
445. ,ERRO10,MSGO003 


TST 
PC ,CLRONI 
90$ 


PC ,.CHKFTL 
446. ,ERROO6.MSGO03 


TST 


ADDRESS 


PC ,LOPCBB 

#DNIS INTE, @PCSRO 
@INTE!GETCMD .BPCSRO 
PC ,CHKONI 

100$ 

PC .CHKFTL 


447. ,ERRO10,MSGO03 


PC ,,CLRONI 





ISSUE GET_CMD PORT COMMAND 
ONI ? 
YES 


‘FATL’' BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR ONI 
_ ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
-WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


GET DEFAULT PHYSICAL ADDRESS 


SAVE IN DEFAULT FILE 





SEQ 301 


DEFAULT WRITE PHYSICAL ADDR FUNC 


LOAD FUNCTION -> PCBB 
ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 
ONI ? 

YES 

‘FATL' BIT SET? 


NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR DNI 


CSERHRD 
447 


ERRO10 
MSGOO3 


CSESCAPE 
L10054-. 





—- ~ 


HAROWARE TESTS 


9662 
9663 
9664 


9665 
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TEST 22: PROMISCUOUS ADDRESS MODE 


103010 


004737 


026652 ' 


012520‘ 
032002' 


030264 ' 


026652’ 


112372 
112364 





BCC 
FTL 


JSR 
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TEST 


102$ 


PC ,CHKFTL 


ERRHRD 450. ,ERROO6,MSGOOS 


ESCAPE 


TST 


: 
;WRITE MULTICAST ADDRESS LIST 


102$: 


104$: 


; 
sDESTINATION ADDRESS = PHYSICAL ADDRESS 


ESCAPE 


@WTMULA,RS 


#30. RO 

PC ,LDUDBB 

#ONI! INTE, @PCSRO 
#INTE!GETCMD,,@PCSRO 
PC ,CHKDNI 

104$ 


PC ,CHKFTL 
451. ,ERRO10,MSGO03 


TST 


PC ,CLRONI 
110$ 


PC ,CHKFTL 
452. ,ERROO6, MSGO03 


TST 





SEQ 302 
; ERROR ? 
NO 


; ‘FATL’ BIT SET? 


; YES, REPORT ERROR 
TRAP = 


-WORD 50 
-WORD ERROOG 
-WORD MSCOOS 

; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10054-. 


DEFAULT WRITE MULTICAST ADDR FUNC 
LOAD FUNCTION -> PCBB 

LOAD LIST INTO UD6B 

LOAD 30 ENTRIES 

MULTICAST LIST -> UDBB 

ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 


DNI ? 
YES 

; ‘FATL’ BIT SET? 

; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 451 
-WORD ERRO10O 
-WORD M™SGOO3 

; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10054-. 

; WRITE ONE TO CLEAR DNI 

; ERROR ? 

; NO 

; 'FATL‘ BIT SET? 

; YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 452 
-WORD ERROOS 
-WORD ™SGOO3 

; AND ABORT TEST 

‘s TRAP CSESCAPE 

-WORD .L10054-. 








EE ae 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
aan ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
9694 065714 012705 014410' 110$: MOV #TORB1IA,RS ; DEFAULT ONE BUFFER TRANSMIT RING 
9695 065720 004737 032164’ JSR PC .LDTDORB ; LOAD TORS 
9696 065724 012705 012750' MOV #RORB1A,RS ; DEFAULT ONE BUFFER RECEIVE RING 
eo 065730 004737 032070' JSR PC ,LORORB ; LOAD RORB 
ane :SET UP BUFFERS AND START 
9701 065734 012701 000272’ MOV @DFAULT,R1 ; POINT TO SOURCE ADDRESS 
9702 965740 012702 016060‘ MOV #ADR21 ,R2 ; DESTINATION = SOURCE 
9703 065744 004737 033206’ JSR PC ,SRCOST ; SAVE FOR PACKET BUILD 
9704 065750 005037 9016562‘ CLR DOCRC ; NO APPEND CRC 
9705 065754 012737 000006 016560‘ MOV #6 ,BYTCNT ; BYTES/PACKET 
9706 065762 004737 033006‘ JSR PC .SETBUF ; SET UP BUFFERS 
9707 065766 012777 004100 112230 MOV #DNI! INTE, @PCSRO ; ENABLE INTERRUPTS 
9708 065774 112777 000104 112222 MOVB #INTE! START, @PCSRO ; ISSUE START PORT COMMAND 
9709 066002 004737 026550’ JSR PC ,CHKONI ; ONI? 
9710 06600€ 103010 BCC 120$ ; YES 
9711 066010 FTL 
066010 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9712 066014 ERRHRD 452. .ERRO12,MSGO03 ; NO, REPORT ERROR 
066014 104456 TRAP CSERHRD 
066016 000704 -WORD 452 
066020 023447’ -WORD ERROI2 
066022 021736' -WORD MSGOO3 
9713 066024 ESCAPE TST ; AND ABORT TEST 
066024 104410 TRAP CSESCAPE 
ones 066026 003252 -WORD L10054-. 
9715 066030 004737 030264’ 120$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
9716 ; ERROR ? 
9717 066034 103010 BCC 130$ ; NO 
9718 066036 FTL 
066036 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9719 066042 ERRHRD 453. ,ERROO6,.MSGOO0S ; YES, REPORT ERROR 
2 104456 
066044 000705 
023030' 
066050 021736' 
9720 066052 ESCAPE TST ; AND ABORT TEST 
066052 104410 
003224 
9721 ; 
9722 066056 004737 027566' 130$: JSR PC ,CHKTXI ; TXI ? 
9723 066062 103010 BCC 140$ ; YES 
9724 066064 FTL 
066064 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
9725 066070 ERRHRD 454. ,ERRO13,MSGO03 ; NO, REPORT ERROR 
066070 104456 
066072 000706 











NS a el 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
066074 023530' -WORD ERRO13 
066076 021736’ -WORD MSGOOS 
9726 066100 ESCAPE TST ; AND ABORT TEST 
0661 104410 TRAP CSESCAPE 
ome 066102 003176 -WORD 1L10054-. 
; 
9728 066104 004737 0630500’ 140$: JSR PC ,CLRTXI i canon a TO CLEAR TXI 
i 
9730 066110 103010 BCC 150$ ; NO 
9731 066112 FTL 
066112 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
9732 066116 ERRHRD 455. ,ERRO14,MSGO0S ; YES, REPORT ERROR 
066116 104456 TRAP CSERHRD 
066120 000707 -WORD 455 
0661 023561' -WORD ERRO14 
066124 021736’ -WORD MSGO003 
9733 066126 ESCAPE TST ; AND ABORT TEST 
066126 104410 TRAP CSESCAPE 
oune 066130 003150 WORD L110054-. 
; 
9735 066132 012705 000620’ 150$: MOV #TORB,RS ; CHECK TORB OWNERSHIP 
9736 066136 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
9737 066142 103010 BCC 160$ ; YES 
9738 066144 FTL 
066144 004737 026652' JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
9739 066150 ERRHRD 456. ,ERRO18 ; NO, REPORT ERROR 
066150 104456 TRAP CSERHRD 
066152 000710 -WORD 456 
066154 024026' -WORD ERRO18 
066156 -WORD 0 
9740 066160 ESCAPE TST ; AND ABORT TEST 
066160 104410 TRAP CSESCAPE 
ones 066162 003116 -WORD 1L10054-. 
9742 066164 012705 016264’ 160$: MOV @TOR1I4A,R5 ; POINT TO EXPECTED TORB 
9743 066170 004737 932370' JSR PC ,LDXTOR ; LOAD INTO XTORBO TABLE 
9744 066174 012705 000620’ MOV #TORB,RS ; CHECK TORB 
9745 066200 004737 027500' JSR PC ,CHK ; ERRORS ? 
9746 066204 103010 BCC 170$ ; NO 
9747 066206 FTL 
066206 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9748 066212 ERRHRD 457. ,ERRO20,MSGOOS ; YES, REPORT ERROR 
066212 104456 
066214 000711 
066216 024206’ 
066220 022042’ 
9749 066222 ESCAPE TST ; AND ABORT TEST 
066222 104410 
. 24 003054 
; 
9751 066226 004737 027316‘ 170$: JSR PC ,CHKRXTI ; RXI ? 








a CT LS LL LLL LLL LE LL LLL LLL CL LLLD\ LLL LL LLL LLL LLL, 





9777 066362 
066362 


ERRHRD 463. ,ERRO21,MSG006 


YES, REPORT ERROR 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 

9752 066232 103010 BCC 180$ ; YES 

9753 066234 FTL 
066234 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL’' BIT SET? 

9754 066240 ERRHRD 460. ,ERRO15,MSGO03 ; NO, REPORT ERROR 
066240 104456 TRAP CSERHRD 
066242 000714 -WORD 460 
066244 023627’ -WORD ERROIS 
066246 021736’ -WORD MSGOO3 

9755 066250 ESCAPE TST ; AND ABORT TEST 
066250 104410 TRAP CSESCAPE 

ovne 066252 003026 -WORD L10054-. 

i 

9757 066254 004737 030432’ 180$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 

9758 ; ERROR ? 

9759 066260 103010 BCC 190$ ; NO 

9760 066262 FTL 
066262 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 

9761 066266 ERRHRD 461. ,ERRO16,MSGO03 ; YES, REPORT ERROR 
066266 104456 TRAP CSERHRD 
066270 000715 -WORD 461 
066272 023660’ -WORD ERROI6 
066274 021736’ -WORD MSGOO3 

9762 066276 ESCAPE TST ; AND ABORT TEST 
066276 104419 TRAP CSESCAPE 
066300 003000 -WORD L10054-. 

, 

9764 066302 012705 000660’ 190$: MOV #RORB,RS ; CHECK RDRB OWNERSHIP 

9765 066306 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 

9766 066312 103010 BCC 200$ ; YES 

9767 066314 FTL 
066314 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 

9768 066320 ERRHRD 462. ,ERRO17 ; NO, REPORT ERROR 
066320 104456 TRAP CSERHRD 
066322 000716 -WORD 462 
066324 023726' -WORD ERROI7 
066326 -WORD 0 

9769 066330 ESCAPE TST ; AND ABORT TEST 
066330 104410 TRAP CSESCAPE 

ovee 066332 002746 -WORD L10054-. 

9771 066334 012705 016454' 200$: MOV @RDR2OC RS ; POINT TO EXPECTED RORB 

9772 066340 004737 032340' JSR PC ,LOXRDR ; LOAD INTO XRORBO TABLE 

9773 066344 012705 000660’ MOV @RORB , RS ; CHECK RDRB 

9774 066350 004737 027206' JSR PC ,CHKRDP. ; ERRORS ? 

9775 066354 103010 BCC 210$ ; NO 

9776 066356 FTL 
066356 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
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TEST 22: PROMISCUOUS ADDRESS MODE 


066364 000717 -WORD 463 
066366 024267’ -WORD ERROZ1 
056370 022204’ -WORD MSGO06 

9778 066372 ESCAPE TST ; AND ABORT TEST 
066372 104410 TRAP CSESCAPE 

eure 066374 002704 “WORE (4 as 

$ 

eine ;COMPARE RBUF WITH TSUF 

9782 066376 013705 016560’ 210$: MOV BYTCNT,RS ; COMPARE DATA 

9783 066402 004737 030712' JSR PC ,CMPDAT ; DATA COMPARE ERROR 7? 

9784 066406 103006 BCC 220% ; NO 

9785 066410 ERRHRD 464. ,ERRO22,MSGO007 ; YES, REPORT ERROR 
066410 104456 TRAP CSERHRD 
066412 000720 -WORD 464 
066414 024350’ -WORD ERROZ2 
066416 022346' -WORD *ASGO007 

9786 066420 ESCAPE TST ; AND ABORT TEST 
066420 104410 TRAP CSESCAPE 
066422 002656 -WORD 1L10054-. 

9787 ; 

9788 066424 2203: 

9789 066424 012705 006472' MOV @RBUF +26. ,R5 ; CHECK CRC 

9790 066430 004737 030642' JSR PC ,.CMPCRC ; ERRORS ? 

9791 066434 103006 BCC 230$ ; NO 

9792 066436 ERRHRD 465. ,ERRO23,MSGO08 ; YES, REPORT ERROR 
066436 1044 TRAP CSERHRD 
066440 000721 -WORD 465 
066442 024417' -WORD ERROZ2S 
066444 022400' -WORD mSGOO0d 

9793 066446 ESCAPE TST ; AND ABORT TEST 
066446 104410 TRAP CSESCAPE 
066450 002630 -WORD L10054-. 

9794 ; 

9795 066452 230$: 

9796 066452 012777 004100 111544 MOV @ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 

9797 066460 112777 000117 111536 MOVB #INTE!STOP ,@PCSRO ; ISSUE STOP PORT COMMAND 

9798 066466 004737 026550’ JSR PC ,.CHKDNI ; ONI ? 

9799 066472 103010 Bcc 240$ ; YES 

9800 066474 FTL 
066474 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 

9801 066500 ERRHRD 466. ,ERRO19,MSGOOS ; NO, REPORT ERROR 
C665 104456 TRAP CSERHRD 
066502 000722 -WORD 466 
066504 024126' -WORD ERROI9 
0665 021736' -WORD MSGOO3 

9802 066510 ESCAPE TST ; AND ABORT TEST 
066510 104410 TRAP CSESCAPE 
066512 002566 .WORD 1L10054-. 

9804 066514 004737 030264’ 2403: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 

980 ; ERROR ? 

9806 066520 103010 BCC 250$ ; NO 

9807 066522 FTL 














7 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 


SEQ 307 





066522 004737 026652’ JSR PC ,CHKFTL 3 ‘FATL’ BIT SET? 
9808 056526 ERRHRD 467. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
06€5 104456 TRAP CSERHRD 
066530 000723 -WORD 467 
066532 023030’ “WORD ERROOG 
066534 021736’ -WORD MSGOOS 
9809 066536 ESCAPE TST ; AND ABORT TEST 
066536 104410 TRAP CSESCAPE 
ome 066 002540 -WORD 110054-. 
; 
ae ;DESTINATION ADDRESS NOT = PHYSICAL ADDRESS 
; 
4 ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
9615 066542 250$ : 
9816 066542 004737 030236’ JSR PC ,CLRCV ; CLEAR RECEIVE BUFFER 
9817 066546 012705 014410’ MOV #TORB1A,R5 ; DEFAULT ONE SUFFER TRANSMIT RING 
9618 066552 004737 %32164' JSR PC ,LDTORB ; LOAD TORB 
9819 066556 012705 012750' MOV ORDORB1A,RS ; DEFAULT ONE BUFFER RECEIVE RING 
oa 004737 032070’ JSR PC ,LORDRB ; LOAD RORB 
: 
oa ;SET UP BUFFERS AND START 
9824 066566 012701 000272’ MOV @DFAULT,R1 ; SOURCE = PHYSICAL ADDRESS 
9825 066572 012702 016066’ MOV #ADR2iC,R2 ; DEST = COMPLEMENTED ADDRESS 
9826 066576 004737 033206' JSR °C .SRCDST ; SAVE FOR PACKET BUILD 
9827 066602 05037 016562’ CLR DOCRC ; NO APPEND CRC 
9828 066606 012737 016560' MOV #6 .BYTCNT 3; BYTES/PACKET 
9829 066614 004737 035006’ JSR PC , SETBUF ; SET UP BUFFERS 
9830 066620 012777 004100 111376 MOV @ONI! INTE , @PCSRO ; ENABLE INTERRUPTS 
9831 066626 112777 0001 111370 MOVB @INTE!START, @PCSRO ; ISSUE START PORT COMMAND 
9832 066634 004737 026550' JSR PC ,CHKONI s ONI? 
9833 066640 103010 BCC 260% ; YES 
9834 066642 FTL 
066642 004737 026652’ JsP PC ,CHKFTL ; ‘FATL’ BIT SET? 
9835 066646 ERRHRD 470. ,ERRO12,MSGOOS ; NO, REPORT ERROR 
066646 104456 TRAP CSERHRD 
066650 000726 -WGORD 470 
066652 023447' -WORD ERROI2 
066654 021736' -WORD MSGOO3S 
9836 066656 ESCAPE 7ST ; AND ABORT TEST 
066656 104410 TRAP CSESCAPE 
easy 002420 -WORD 110054-. 
i 
9838 066662 004737 030264’ 2603: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
9839 ; ERROR ? 
9840 066666 103010 BCC 270$ ; NO 
9841 066670 FTL 
066670 004737 026652‘ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
9842 066674 ERRHRD 471. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
066674 104456 
066676 000727 


eS 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST | 
066700 023030’ -WORD ERROOG 
066702 021736' -WORD MSGOOS 
9843 066704 ESCAPE TST ; AND ABORT TEST 
066704 104410 TRAP CSESCAPE 
ones 066706 902372 -WORD 110054-. 
; 
9845 066710 004737 027566’ 270%: JSR PC .CHKTXI 3; TXI ? 
9846 066714 103010 BCC 280$ ; YES 
9847 066716 FTL 
066716 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? | 
9848 066722 ERRHRD 472. ,ERRO13,MSGO0S ; NO, REPORT ERROR 
066722 104456 TRAP CSERHRD 
066724 0007 -WORD 472 
066726 9023530‘ -WORD ERRO1I3 
066730 021736’ -WORD MSGOOS 
9849 066732 ESCAPE TST ; AND ABORT TEST 
066732 104410 TRAP CSESCAPE 
une 066734 002344 WORD 110054-. 
i 
9851 066736 004737 030500’ 280%: JSR PC ,CLATXI ; WRITE ONE TO CLEAR TXI 
9852 ; ERROR 7 
9853 066742 1035010 BCC 290$ ; NO 
066744 FTL 
066744 004737 026652’ JSR PC ,CHKFTL 3 ‘FATL’ BIT SET? | 
9855 066750 ERRHRD 473. ,ERRO14,MSGOOS ; YES, REPORT ERROR 
066750 104456 TRAP CSERHRD 
066752 000731 -WORD 473 
066754 0235561' -WORD ERRO14 
066756 021736' -WORD MSGOO3S 
9856 066760 ESCAPE TST ; AND ABORT TEST 
066760 104410 TRAP CSESCAPE 
—_ 066762 002316 -WORD 1L10054-. 
i 
9858 066764 012705 000620' 290$: MOV @TORB.RS ; CHECK TORB OWNERSHIP 
9859 066770 004737 027024’ JSR PC , CHKOWN ; OWN = PORT DRIVER ? 
9860 066774 103010 BCC 300% ; YES 
9861 066776 FTL 
066776 004737 026652‘ JSR PC, CHKFTL ; ‘FATL' BIT SET? 
9862 067002 ERRHRD 474. ,ERRO18 ; NO, REPORT ERROR 
067002 104456 TRAP CSERHRD 
067004 000732 -WORD 474 
067006 024026' -WORD ERROIS 
067010 -WORD 0 
9863 067012 ESCAPE TST ; AND ABORT TEST 
067012 104410 TRAP CSESCAPE 
eone 067014 002264 -WORD 1L10054-. 
i 
9865 067016 012705 016264’ 300$: MOV @TOR14A,R5 ; POINT TO EXPECTED TORB 
9866 067022 004737 032370’ JSR PC ,LOXTDR ; LOAD INTO XTDRBO TABLE 
7 067026 012705 000620’ MOV #TDORB,RS ; CHECK TORB 
9868 067032 004737 027500° JSR PC ,CHKTOR ; ERRORS ? 








eS LT 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
9869 067036 103010 Bcc 310$ + NO 
9870 067040 FTL 
067040 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
9371 (57044 ERRHRD 475. ,ERRO20,MSGO0S ; YES, REPORT ERROR 
7044 104456 TRAP § CSERHRD 
067046 000733 .WORD 475 
067050 024206' “WORD ERROZO 
067052 022042' “WORD 
9872 067054 ESCAPE TST ; AND ABORT TEST 
067054 104410 TRAP  CSESCAPE 
is 067056 002222 .WORD 110054-. 
; 
9874 067060 004737 027316' 310$: JSR PC ,CHKRXI ; RXI ? 
9875 067064 103010 Bcc 320$ ; YES 
9876 067066 FTL 
067066 004737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
9877 067072 ERRHRD 476. ,ERRO1S,MSGOO3 ; NO, REPORT ERROR 
067072 104456 TRAP § CSERHRD 
067074 000734 WORD 476 
067076 023627' -WORD ERROIS 
067100 021736’ -WORD MSGOO3 
9878 067102 ESCAPE TST ; AND ABORT TEST 
7102 104410 TRAP  CSESCAPE 
sad 067104 002174 .WORD 110054- 
; 
9880 067106 004737 030432’ 320$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
9881 ; ERROR ? 
9882 067112 103010 BCC 330$ ; NO 
9883 067114 FTL 
067114 004737 026652' JSR PC ,CHKFTL ; 'FATL' BIT SET? 
9884 067120 ERRHRD 477. ,ERRO16,MSGOO3 ; YES, REPORT ERROR 
067120 104456 TRAP § CSERHRD 
067122 000735 .WORD 477 
067124 023660° “WORD ERROI6 
067126 021736’ _WORD MSGOO3 
9885 067130 ESCAPE TST ; AND ABORT TEST 
067130 104410 TRAP CSESCAPE 
peer 067132 002146 .WORD 110054-. 
i 
9887 067134 012705 000660’ 330$: MO 2,e¢ ; CHECK RDRB OWNERSHIP 
9888 067140 004737 027024 JS: PH owh ; OWN = PORT DRIVER ? 
9889 067144 103010 BC. 3a0$ ; YES 
9890 067146 FTL 
067146 004737 026652° JSR PC .CHKFTL ; ‘FATL' BIT SET? 
9891 067152 ERRHRL@ 480. .ERRO17 ; NO, REPORT ERROR 
7152 104456 
067154 000740 
067156 023726' 
067160 





a 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
9892 067162 ESCAPE TST 
067162 104410 
067164 002114 
9893 ; 
9894 067166 012705 016454’ 340$: MOV @ROR2ZOC RS 
9895 067172 004737 032340‘ JSR PC ,LOXROR 
g 067176 012705 000660‘ MOV @RORB,RS 
9897 067 004737 027206’ JSR PC ,CHKRDR 
9898 067206 103010 BCC 3503 
9899 067210 FTL 
067210 004737 026652’ JSR PC ,CHKFTL 
9900 067214 ERRHRD 481. ,ERRO21,MSGO06 
067214 104456 
067216 000741 
067220 024267' 
067222 022204’ 
9901 067224 ESCAPE TST 
067224 104410 
067226 002052 
9902 : 
a ;COMPARE RBUF WITH TBUF 
9905 067230 013705 016560’ 3508: MOV BYTCNT ,RS 
9906 067234 004737 030712' JSR PC DAT 
9907 067240 103006 BCC ® j ,. 
9908 067242 ERRHRD 452. TERRCc2,.MSG007 
067242 104456 
067244 000742 
067246 024350’ 
067250 022346' 
9909 067252 ESCAPE TST 
067252 104410 
067254 002024 
9910 3 
9911 067256 360%: 
9912 067256 012705 006472' MOV @RBUF +26. RS 
9913 067262 004737 030642’ JSR PC .CMPCRC 
9914 067266 103006 Bcc 3708 
9915 067270 483. ,.ERRO23 ,MSGO08 
067270 104456 
067272 000743 
067274 024417' 
067276 022400' 
9916 067300 ESCAPE TST 
067300 104410 
067302 001776 
9917 ; 
9918 067304 3708: 
9919 067304 012777 004100 110712 MOV @ONI! INTE, @PCSRO 
9920 067312 112777 000117 110704 MOVB @INTE!STOP ,@PCSRO 
9921 067320 004737 026550’ JSR ° DNI 
9922 067324 103010 BCC 380$ 
9923 067326 FTL 
067326 004737 026652’ JSR PC .CHKFTL 








AND ABORT TEST 
TRAP 
. WORD 


POINT TO EXPECTED RORB 
LOAD INTO XRORBO TABLE 
CHECK RDORB 


ERRORS 7? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 
COMPARE DATA 
-/ COMPARE ERROR ? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 
CHECK CRC 
ERRORS ? 
NO 
YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
- WORD 


ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 
ONI ? 

YES 


‘FATL' BIT SET? 





SEQ 310 


CSESCAPE 
L10054-. 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
9924 067332 ERRHRD 484. ,ERRO19,MSGOOS ; NO, REPORT ERROR 
067332 104456 TRAP CSERMRD 
067334 000744 -WORD 464 
067336 024126‘ -WORD ERROI9 
06 021736‘ -WORD MSGO03 
9925 067342 ESCAPE TST ; AND ABORT TEST 
067342 104410 TRAP CSESCAPE 
067344 001734 WORD L110054-. 
i 
9927 067346 004737 030264’ 380%: JSR PC ,CLRONI i pth TO CLEAR ONI 
; 
9929 067352 103010 BCC 390% s NO 
9930 067354 FTL 
067354 004737 026652’ JSR PC ,CHKFTL s ‘FATL’ BIT SET? 
9931 067360 ERRHRD 485. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
067360 104456 TRAP CSERHRD 
067362 000745 -WORD 485 
067364 023050’ -WORD ERROOG 
067366 021736' -WORD MSGOOS 
9932 067370 ESCAPE TST s AND ABORT TEST 
067370 104410 TRAP CSESCAPE 
eens 067372 001706 -WORD 110054-. 
; 
oohe ;sREWRITE DEFAULT PHYSICAL ADDRESS 
9936 067374 390$: 
9937 067374 012705 000272’ MOV ; GET DEFAULT PHYSICAL ADDRESS 
9938 067400 004737 032050’ JSR ; SAVE IT IN DEFAULT TABLE 
9939 067404 012705 012500’ MOV 3; DEFAULT WRITE PHYSICAL ADDR FUNC 
9940 067410 004737 032002’ JSR »LOP ; LOAD FUNCTION -> PCBB 
9941 067414 012777 100 110602 MOV @ONI ! INTE , SPCSRO s ENABLE INTERRUPTS 
9942 067422 112777 000102 110574 MOVB @INTE!GETCMD ,SPCSRO s ISSUE GET_CMD PORT COMMAND 
9943 067430 004737 026550’ JSR . CHKDNI ; ONI ? 
9944 067434 103010 Bcc 4008 ; YES 
9945 067436 FTL 
067436 004737 026652' JSR PC ,CHKFTL s ‘FATL’ BIT SET? 
9946 067442 ERRHRD 486. ,ERRO10,MSGOOS s NO, REPORT ERROR 
067442 104456 TRAP CSERHRD 
067444 000746 -WORD 486 
067446 023331' -WORD ERRO1O 
067450 1736' -WORD MSGOOS 
9947 067452 ESCAPE TST ; AND ABORT TEST 
0674 104410 TRAP CSESCAPE 
067454 001624 -WORD L110054-. 
; 
9949 067456 004737 0350264’ 4008: JSR PC ,CLRONI : pot - ae TO CLEAR DNI 
; 
9951 067462 103010 Bcc 410% 3 
9952 067464 FTL 
067464 004737 026652’ JSR PC ,CHKFTL s ‘FATL' BIT SET? 


qaqa oa» 


te -— 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
9953 067470 


104456 
000747 
023030° 
021736' 


104410 
001576 


004737 
012704 
012702 


004737 


103010 


004737 


104456 
000752 
023447' 
021756' 


104410 
001452 


004737 
103010 


004737 


104456 


030236‘ 
000012 
016074' 


014410° 
032164 ' 
012750° 
032070' 


026652 ' 


030264’ 


026652’ 


016560’ 


110430 
110422 


$ 
;D0 TEN 


; 
410$: 


: 
;SET UP 


4203: 


SET UP 


4303: 
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ERRHRD 487. ,ERROO6,MSGOOS 


ESCAPE 


TST 





; YES, REPORT ERROR 


; AND ABORT TEST 


LOOPS WITH DEST ADDR = MULTICAST ADDRESS 


JSR 
MOV 
MOV 


RINGS FOR ONE BUFFER LOOPBACK 


JSR 
ERRHRD 


PC .CLRCV 


#10. ,R4 
@MULTL ,R2 


#TORB1A,RS 
PC ,.LDTORB 
@RDRBIA,RS 
PC ,LDRORB 


AND START 


@INTE!START, @PCSRO 
PC ,CHKONI 
430$ 


PC .CHKFTL 
490. ,ERRO12,MSGO03 


TST 


PC ,CLRONI 


440$ 


PC ,CHKFTL 
491. ,ERROO6 ,MSGO03 


CLEAR RECEIVE BUFFER 
DO LOOP = TEN 
R2 POINTS 1O MULTICAST LIST 





SEQ 312 


CSERHRD 
487 


ERROOE 
MSGO03 


CSESCAPE 
L10054-. 


DEFAULT ONE BUFFER TRANSMIT RING 


LOAD TORB 


DEFAULT ONE BUFFER RECEIVE RING 


LOAD RORB 


SOURCE = DEFAULT PHYS. ADDRESS 


DEST = MULTICAST ADDRESS 
NO APPEND CRC 
BYTES/PACKET 

SET UP BUFFERS 

ENABLE INTERRUPTS 

oe oy START PORT COMMAND 


YES 
‘FATL’ Bit SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL‘' BIT SET? 
YES, REPORT ERROR 
TRAP 


CSERHRD 
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10015 


067764 
067770 
067774 





000753 


023030° 
021736' 


104410 
001424 


004737 
1030190 


004737 


104456 
000754 
023530° 
021736' 


104410 
001376 


004737 
103010 


004737 


104456 
000755 
023561' 
021736’ 


104410 
001350 


012705 
004737 
103010 


004737 


104456 
000756 
024026 ' 
000000 


104410 
001316 


012705 
004737 
012705 





027566‘ 


026652 ' 


030500' 


026652 ' 


000620' 
027024' 


026652’ 


016264' 
032370' 
000620’ 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 


é 
4405: 


4503: 


470$: 


4803: 


ESCAPE 


JSR 
ERRHRD 


ESCAPE 


TST 
PC ,CHKTXI 
450$ 


PC ,CHKFTL 
492. ,ERRO13,MSGO03 


TST 
PC ,CLRTXI 
470$ 


PC ,CHKFTL 
493. ,ERRO14,MSGO03 


TST 


#TORB.RS 
PC ,CHKOWN 
4803 

PC ,CHKFTL 


494. ,ERRO18 


TST 


#TDR14A,R5 
PC ,LOXTDR 
#TORB,RS 





. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
.WORD 
WRITE ONE TO CLEAR TXI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
- WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
CHECK TORB OWNERSHIP 
OWN = PORT DRIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


; POINT TO EXPECTED TORB 


LOAD INTO XTORBO TABLE 
CHECK TORB 





SEQ 313 


491 
ERROO6 
MSGO03 


CSESCAPE 
L10054-. 


CSERHRD 
493 
ERRO14 
MSGOO3 


CSESCAPE 
L10054-. 


CSESCAPE 
L10054-. 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 
10016 070000 004737 027500’ JSR PC ,CHKTOR ; ERRORS ? 
10017 070004 103010 BCC 490$ NO 
10018 070006 FTL 
070006 004737 026652’ JSR PC, CHKFTL ; ‘'FATL’ BIT SET? 
10019 070012 ERRHRD 495. ,ERRO20,MSGOOS ; YES, REPORT ERROR 
070012 104456 TRAP § CSERHRO 
070014 000757 WORD 495 
070016 024206° “WORD  ERROZO 
070020 022042: "WORD MSGOOS 
10020 070022 ESCAPE TST ; AND ABORT TEST 
070022 104410 TRAP _ CSESCAPE 
altel 070024 001254 .WORD 10054-. 
; 
10022 070026 004737 027316’ 490$: JSR PC, CHKRXI ; RXI ? 
10023 070032 103010 BCC 500$ ; YES 
10024 070034 FTL 
070034 004737 026652’ JSR PC. CHKFTL ; ‘FATL’ BIT SET? 
10025 070040 ERRHRD 496. ,ERRO1S,MSGO03 ; NO, REPORT FRROR 
70040 104456 TRAP § CSERHRD 
070042 000760 .WORD 496 
070044 023627° : ERRO1S 
070046 021736' "WORD MSGOO3 
10026 070050 ESCAPE TST ; AND ABORT TEST 
070050 104410 TRAP  CSESCAPE 
eae 070052 001226 .WORD 1L10054-. 
10028 070054 004737 030432’ 500$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
10029 ; ERROR ? 
10030 070060 103010 BCC 510$ ; NO 
10031 070062 FTL 
070062 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ SIT SET? 
10032 070066 ERRHRD 497. ,€RRO16,MSGOO3 ; YES, REPORT ERROR 
70066 104456 TRAP § CSERHRD 
070070 000761 .WORD 497 
070072 023660: "WORD ERROIG6 
070074 021736' “WORD MSGOO3 
10033 070076 ESCAPE TST ; AND ABORT TEST 
070076 104410 TRAP _ CSESCAPE 
aia 070100 001200 .WORD 110054-. 
10035 070102 012705 000660° 510$: MOV ®RDRB, RS ; CHECK RDRB OWNERSHIP 
10036 070106 004737 027024' JSR PC, CHKOWN ; OWN = PORT DRIVER ? 
10037 070112 103010 BCC 520$ ; YES 
10038 070114 FTL 
070114 004737 026652’ JSR PC, CHKFTL ; ‘FATL' BIT SET? 
10039 070120 ERRHRD 500. ,ERRO17 ; NO, REPORT ERROR 
070120 104456 TRAP § C$ERHRD 
070122 000764 .WORD 500 
070124 023726° "WORD ERROL? 


ee 
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ADORESS MODE 


TEST 22: PROMISCUOUS 


1004C 


1006 
10070 
10071 


070126 
979130 
070130 
070132 


070134 
070140 
070144 
070150 
070154 
070156 
070156 


070162 


070174 


070176 


070222 
070224 


070272 
070274 


004737 


012705 
004737 
103006 


104456 
000767 
024417' 
022400' 


104410 
001030 


012777 


026652’ 


016560‘ 
030712’ 


006472' 
030642 ' 


004100 
000117 
026550’ 


107736 


5208: 





ESCAPE 


JSR 
ERRHRD 


ESCAPE 
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TEST 


TST 


@RDR2OC RS 

PC ,LDXROR 

@RDORB RS 

PC ,,CHKRDR 

530$ 

PC ,CHKFTL 

501. ,ERRO21,MSGO06 


TST 


;COMPARE RBUF WITH TBUF 


530$: 


540$: 


ESCAPE 


ESCAPE 


BYTCNT RS 

PC .CMPDAT 

540$ 

502. ,ERRO22 ,MSG007 


TST 


ORBUF +26. ,R5 
PC ,.CMPCRC 


550$ 
503. ,ERRO2Z3,MSGO08 
TST 


#ONI! INTE, @PCSRO 
#INTE! STOP ,@PCSRO 
PC ,CHKDNI 

560$ 





AND ABORT TEST 


POINT TO EXPECTED RDRB 
LOAD INTO XRORSO TABLE 


CHECK RDRB 
ERRORS ? 
NO 


‘FATL 


BIT SET? 


YES, REPORT ERROR 


AND ABORT TEST 


COMPARE DATA 
DATA COMPARE ERROR ? 


NO 
YES, REPORT ERROR 
; AND ABORT TEST 


s;CHECK CRC 
; ERRORS ? 


; NO 
; YES, REPORT ERROR 


; AND ABORT TEST 


; ENABLE INTERRUPTS 





TRAP 
- WORD 


; ISSUE STOP PORT COMMAND 


; DNI ? 
; YES 


SEQ 315 


0 


CSESCAPE 
L100S4-. 


CSERHRD 
50 


1 
ERRO21 
MSGO06 


CSESCAPE 
L10054-. 


CSESCAPE 
L10054-. 


CSERHRD 
503 
ERRO2S 
MSGO08 


CSESCAPE 
L10054-. 





- 
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TEST 22: PROMISCUOUS ADDRESS MODE 


10072 
0 


070314 


070320 
070322 


070322 


070326 
070326 
070330 
070332 
070334 
070336 
070336 
070340 


070342 
070342 
070346 
070352 
070356 
070360 
070362 


070366 
070372 


070376 
070376 





004737 


104456 
000770 
024126’ 
021736’ 


104410 
000766 


004737 
103010 


004737 


012704 
012702 


012705 


026652 


030264’ 


026652 ' 


030236 ' 


000012 
016170’ 


014410' 
032164’ 
012750’ 
032970’ 


000264 ' 
033206‘ 
016562 ' 
000006 


0330 
004100 


016560’ 
107552 


560$ : 


565$: 


; 
;D0 TEN 


; 
566$: 


; 
;SET UP 


570$: 


;SET UP 


JSR 
ERRHRD 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 
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TEST 


PC ,CHKFTL 
504. ,ERRO19, MSGOOS 


TST 


PC ,CLRONI 
565$ 


PC ,CHKFTL 
505. ,ERROO6 , MSGO03S 


TST 


PC ,CLRCV 
2 








SEQ 316 


‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP CSERHRD 
. WORD 
-WORD ="RO19 
-WORD i15G003 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10054-. 

WRITE ONE TO CLEAR DNI 

ERROR ? 

NO 

‘FATL’' BIT SET? 

YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 505 
-WORD ERROOG 
-WORD MSGOO3 

AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10054-. 

CLEAR RECEIVE BUFFER 

UPDATE Re 

UPDATE R3 

DONE TEN LOOPBACKS 

YES 

NO 


LOOPS WITH DEST ADDRESS = COMPLIMENTED MULTICAST ADDRESS 
; DO LOOP = TE 


MOV 
MOV 


#10. ,R4 
@MULTLC,R2 


RINGS FOR ONE BUFFER LOOPBACK 


#7;DRBLA,RS 
PC ,LOTDRB 
@RORBLA,RS 
PC ,LDRORB 


AND START 


#SRC .R1 

PC ,SRCDST 

DOCRC 

#6 ,BYTCNT 

PC ,SETBUF 

#DNI! INTE, @PCSRO 


N 
R2 POINTS TO COMPLIMENTED LIST 


DEFAULT ONE BUFFER TRANSMIT RING 
LOAD TDORB 
DEFAULT ONE BUFFER RECEIVE RING 
LOAD RORB 


SOURCE = DEF PHYSICAL ADOR 
DEST = COMPL MULTICAST ADDR 
NO APPEND CRC 

BY TES/PACKET 

SET UP BUFFERS 
ENABLE INTERRUPTS 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 


000104 107544 


112777 


004737 
103010 


004737 


104456 
000777 





026550‘ 


026652 


030264 ' 


026652 ' 


027566 ' 


026652 ' 


030500’ 


026652 ' 


$ 
580$: 


; 
590$: 


600$: 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 
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#INTE! START, @PCSRO 
PC ,CHKDNI 
580$ 


PC ,CHKFTL 
506. ,ERRO12,MSGO003 


TST 


PC ,CLRONI 
590$ 


PC ,CHKFTL 
507. ,ERROO6, MSGO03 


TST 
PC ,CHKTXI 
600$ 


PC .CHKFTL 
510. ,ERRO13,.MSGO03 


TST 
PC ,CLRTXI 
610% 


PC ,CHKFTL 
511. ,ERRO14 ,MSGOO3 





ISSUE START PORT COMMAND 
DONI? 


YES 


‘FATL‘ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR DNI 
— ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
-WORD 
TXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR TXI 
-' 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 





SEQ 317 


CSERHRD 


506 
ERROL2 
MSGOO03 


CSESCAPE 
L10054-. 


CSERHRD 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 


0 
10137 oeias 


10138 

10139 070610 
10140 070614 
10141 070620 
10142 070622 


10143 pth cr 


070664 


10155 070704 
10156 070710 
10157 070712 


070712 


10158 070716 
070716 





023561’ 
021736' 


103010 


004737 


104456 
001001 
024206 ' 
022042’ 


104410 
000376 


004737 
103010 


004737 


000620’ 
027024 ' 


026652’ 


016264 ' 
032370’ 
0006 


027316' 


026652‘ 


030432 ' 


$ 
610$: 


H 
6203: 


: 
630$: 


; 
6408: 


ESCAPE 


ESCAPE 


JSR 


TST 


#TORB,RS 
620$ 


PC ,CHKFTL 
512. ,ERRO18 


TST 


#TDOR14A,R5 
PC ,LOXTDR 
#TORB,RS 
PC ,CHKTDR 
630$ 


PC .CHKFTL 
513. ,ERRO20, MSGOO0S 


TST 
PC ,CHKRXT 
640% 


PC ,CHKFTL 
514. ,ERRO1S, MSGO0S 


TST 


PC ,CLRRXI 


OS SS LL LLL 
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we 


- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK TORB OWNERSHIP 
OWN = PNRT DRIVER ? 
YES 
‘FATL‘ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
.WORD 
. WORD 
AND ABORT TEST 
TRAP 
WORD 
POINT TO EXPECTED TORB 
LOAD INTO XTORBO TABLE 
CHECK TORB 
ERRORS ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
.WORD 
RXI ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR RXI 
ERROR ? 





SEQ 318 
ERRO14 
MSGO003 


CSESCAPE 
L10054-. 


CSESCAPE 
L10054-. 


CSESCAPE 
L10054-. 
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10163 070736 
10164 070740 


070740 


10165 070744 
070744 
070746 
070750 
070752 

10166 070754 
070754 
070756 


10168 070760 
10169 070764 
10170 070770 
10171 070772 

070772 


10172 070776 
070776 


10178 071026 
10179 071030 


071030 
10180 yeh ono 


10182 
10183 
10184 
10185 071050 
10186 071054 


10187 071060 
10188 071062 


071070 


103010 


004737 


012705 
004737 
103010 


004737 


104456 
001004 
023726‘ 
000000 


104410 
000270 


012705 
012705 
004737 
103010 


004737 


104456 
001005 
024267' 
022204' 


104410 
000232 


013705 
004737 
103006 


104456 
001010 
024350’ 
022346' 


026652 ' 


016560’ 
030712’ 


BCC 650$ 
FTL 


JSR PC ,CHKFTL 


ERRHRD 515. ,ERRO16,MSGOOS 


ESCAPE TST 

; 

650$: MOV @RORB , RS 
JSR PC ,CHKOWN 
BCC 660$ 
FTL 


JSR PC ,CHKFTL 
ERRHRD 516. ,ERRO17 


ESCAPE TST 

; 

660%: MOV @RDR2OC RS 
MOV #RORB , RS 
JSR PC ,CHKRDR 
BCC 670$ 
FTL 


JSR PC ,CHKFTL 


ERRHRD 517. ,ERRO21,MSGO06 


ESCAPE TST 


; 
;COMPARE RBUF WITH TBUF 


670$: MOV BYTCNT RS 
JSR PC ,CMPDAT 
BCC 68 


O$ 
ERRHRD 520. ,ERRO22,MSGO007 


ee 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
CHECK RDRB OWNERSHIP 
OWN = PORT DRIVER 7? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
- WORD 


POINT TO EXPECTED RDRB 
CHECK RDRB 

ERRORS ? 

NO 

‘FATL' BIT SET? 

YES, REPORT ERROR 


TRAP 
. WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
COMPARE DATA 
_ COMPARE ERROR ? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 


SEQ 319 


CSESCAPE 
L10054-. 


CSESCAPE 
L10054-. 


CSERHRD 
0 


S2 
ERRO22 
MSGO07 
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TEST 22: PROMISCUOUS ADDRESS MODE TEST 


eS 


10189 071072 ESCAPE TST ; AND ABORT TEST 
071072 104410 TRAP CSESCAPE 
071074 000204 -WORD L10054-. 

10190 ; 

10191 071076 680$ : 

10192 071076 012705 006472’ MOV @RBUF +26. .R5 ; CHECK CRC 

10193 071102 004737 030642’ JSR PC ,CMPCRC ; ERRORS ? 

10194 071106 103006 Bcc 690$ ; NO 

10195 071110 ERRHRD 521. ,ERRO23,MSG008 ; YES, REPORT ERROR 
071110 104456 TRAP CSERHRO 
071112 001011 -WORD 521 
071114 024417’ -WORD ERROZS 
071116 022400’ . WORD 

10196 071120 ESCAPE TST ; AND ABORT TEST 
071120 104410 TRAP CSESCAPE 
071122 000156 -WORD L10054-. 

10197 : 

10196 071124 6 

10199 071124 012777 004100 107072 MOV @ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 

10200 071132 112777 000117 107064 MOVB #INTE! STOP ,@PCSRO ; ISSUE STOP PORT COMMAND 

10201 071140 004737 026550’ JSR PC ,CHKDNI ; ONI ? 

10202 071144 103010 Bcc 700$ :; YES 

10203 071146 FTL 
071146 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’‘ BIT SET? 

10204 071152 ERRHRD 522. ,ERRO19,MSGO03 ; NO, REPORT ERROR 
071152 104456 TRAP CSERHRD 
071154 001012 -WORD S22 
071156 024126’ -WORD ERROI9 
071160 021736' -WORD MSGOO3 

10205 071162 ESCAPE TST ; AND ABORT TEST 
071162 104410 TRAP CSESCAPE 

sone 071164 000114 -WORD 110054-. 

; 

10207 071166 004737 030264' 700$: JSR PC ,CLRONI ; WeatE ONE TO CLEAR ONI 

10208 ; ERROR ? 

10209 071172 103010 BCC 710$ ; NO 

10210 071174 FIL 
071174 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

10211 071200 ERRHRD 523. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
071200 1044 TRAP CSERHRD 
071202 001013 -WORD 523 
071204 023030' -WORD ERROOG 
071206 021736' -WORD M™SGOO3 

10212 071210 ESCAPE TST ; AND ABORT TEST 
071210 104410 TRAP CSESCAPE 
071212 000066 -WORD L10054-. 

10213 ; 

10214 071214 710$: 

10215 071214 004737 030236‘ JSR PC ,CLRCV ; CLEAR RECEIVE BUFFER 

10216 071220 062702 000006 ADD 96 ,R2 ; UPDATE R2 

10217 071224 062703 000004 ADD 04 RS ; UPDATE R3 

10218 071230 005304 DEC R4 ; DONE TEN LOOPBACKS 

10219 071232 001402 BEQ 900$ ; YES 
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10220 071234 000137 070376‘ JMP 570$ ; NO 
10221 





10222 071240 9$00$: 
; INSURE DELUA INTR BITS CLEAR 


10223 071240 004737 030346’ JSR PC, ,CLINTR 
10225 poke na EXIT TST 


10227 ;LOCAL TEST MESSAGE 
10229 071250 104 105 114 T22ID:.ASCIZ ‘DELUA PROMISCUOUS MODE ' 


10230 .EVEN 
10231 


10232 071300 ENOTST 
L10054: 


071300 
071300 104401 





SEQ 321 


CSExIT 
L10054-. 


CSETST 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 


071302 
071302 


071302 


071302 
071306 


071312 
071316 
071320 
071326 
071334 
071340 
071342 





-SBTTL TEST 23: ENABLE ALL MULTICAST MODE TEST 


sSSSEESAESSEEALESEESEESSERASESSESEASASESESESESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 


THIS TEST VERIFIES THAT ENABLE ALL MULTICAST MODE 
IS OPERATIONAL . 

A WRITE MULTICAST ADDRESS LIST FUNCTION IS USED TO SET 
THE DELUA'S MULTICAST ADDRESS LIST. 

INTERNAL LOOPBACKS ARE THEN PERFORMED WITH 

CURRENTLY ENABLED AND THEN CURRENTLY DISABLED 
MULTICAST DESTINATION ADDRESSES. 

ALL LOOPBACKS ARE VERIFIED FOR SUCCESSFUL RECEPTION. 


TEST SEQUENCE: 
1. WRITE MODE REGISTER = INTERNAL LOOPBACK 
and ENABLE ALL MULTICAST MODE 
2. WRITE RING FORMAT 
3. WRITE PHYSICAL ADDRESS 
4. WRITE MULTICAST ADDRESS LIST 
5. SET UP RINGS AND BUFFERS 
. WITH a ADDRESS = MULTICAST ADDRESS 
3 
8 
9 


REPEAT STEPS 5 - 8 FOR ALL TEN LIST ENTRIES 
. SET UP RINGS AND BUFFERS 

WITH DESTINATION ADDRESS = COMPLIMENTED MULTICAST ADDRESS 
. ISSUE START 


; 
; 
; 
: 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; 
; . CHECK FOR ERRORS 
; 

; 

: 

; 


13. ISSVE STOP 
14. REPEAT STEPS 10 - 13 FOR ALL TEN ENTRIES 
PVeTTTTTTTTTTTTTTT TT TTT TTT Tt 
BGNTST 
T23:: 
PNIMAC T23ID 
073534’ MOV #T23ID ,.R4 ;GET POINTER TO TEST NAME MESSAGE 
032734’ JSR PC .PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
033434' JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
Bcc 30$ ; NO 
004100 106676 MOV @DNI! INTE, 8PCSRO ; ENABLE INTERRUPTS 
000140 106670 MOVB @INTE! RSET ,@PCSRO ; YES, RESET DELUA 
027736’ JSR PC ,CKDNI ; ONI ? 
BCC 20$ ; YES 
FIL 
026652’ JSR PC ,CHKITL ; ‘FATL' BiT SET? 
ERRHRD 524. ,ERROO6,MSGOO0S ; NO, REPORT ERROR 








LL 
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071352 
071354 
10279 071356 
071356 
071360 


10281 071362 


2 
10283 071366 
10284 071370 


071370 
10285 071374 


10299 
10300 071466 
10301 
10302 071472 
10303 071474 


071474 
10304 071500 
071 


071 
10305 071510 
071510 


MACRO YOS.02 Fride 
ALL MULTICAST MODE TEST 


023030’ 
021736’ 


104410 
002216 


004737 
103010 


004737 


030264 ' 


026652‘ 


030264 ' 


026652’ 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


ESCAPE 





TST 
PC ,CLRONI 
30$ 


PC ,CHKFTL 
525. ,ERROO6 , MSGOOS 


TST 


PC,L 
@ONI! INTE , @PCSRO 
@INTE!GETPCB .BPCSRO 
A Jct 


PC ,CHKFTL 
526. ,ERROO9, MSGOOS 


TST 


PC ,CLRONI 
50% 


PC ,CHKFTL 
527. ,ERROO6 ,MSGOOS 


TST 


Ss LL 
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. WORD 
- WORD 
AND ABORT TEST 
TRAP 
WORD 
WRITE ONE TO CLEAR ONI 
ERROR 7? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 


CLEAR RBUF AND TBUF 








ENABLE INTERRUPTS 
ISSUE GET_PCBB PORT COMMAND 
a 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
ERROR ? 


‘FATL’' BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


CSERHRD 
S27 


ERROOG 
MSGO03 


CSESCAPE 
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071512 002064 


10307 
10308 


10309 
10310 071514 
10311 071520 
10312 071524 
10313 071532 
10314 071540 
10315 071546 
10316 071552 
10317 071554 
071554 


10318 071560 
07 


071 
10319 071570 
071570 
071572 
10320 
10321 071574 
10322 
10323 071600 
10324 071602 
071602 


10325 071606 
071606 


£0336 071662 
10337 071666 
0338 071670 

071670 


10339 071674 
071674 


a 






030264 ' 


026652 ' 


01254%' 
032002 ' 


106350 
106342 


: 
sWRITE MODE REGISTER = INTERNAL LOOPBACK 


At 12-Jul-85 09:33 Page 114-2 
MODE TEST 


50$: 


: 
;WR_TE RING FORMAT 
708; Vv 


end ENABLE ALL MULTICAST MODE 


MOV @WTMODE .RS 

JSR PC ,LDOPCBB 

MOV MODE 24 ,PCBB+2 

MOV @ONI! INTE , BPCSRO 
MOVB @INTE!GETCMD , @PCSRO 
JSR PC ,CHKONI | 
BCC 60$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 530. ,ERRO10,MSGO0S 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 70$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 531. ,ERROO6,MSGOOS 
ESCAPE TST 


MO S.RS 

JSR PC ,LOPCBB 

MOV oRS 

MOV #6 ,RO 

JSR PC ,LOUDBB 

MOV @ONI ! INTE , @PCSRO 
MOVB @INTE!GETCMD ,@PCSRO 
JSR PC ,CHKDNI 

Bcc 80$ 

FTL 

JSR PC .CHKFTL 


ERRHRD 532. ,ERRO10,MSGOOS 





DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 


MODE = INTL LOOPBACK AND ENAL 


ENABLE INTERRUPTS 
a GET_CMD PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
-WORD 
- WORD 
AND ABORT TEST 
TRAP 
WORD 


WRITE ONE TO CLEAR DN 
ERROR ? 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


AND ABORT TEST 


ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 
ONI ? 

YES 


‘FATL’ BIT SET? 


NO, REPORT ERROR 
TRAP 





L10055-. 


CSERHRD 
530 


ERRO10 
MSGO003 


CSESCAPE 
L10055-. 


CSERHMRD 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
071676 001024 . WORD 532 
071700 023331' .WORD ERROIO 
071702 021736’ -WORD MSGOO03 
10340 071704 ESCAPE TST ; AND ABORT TEST 
071704 104410 TRAP CSESCAPE 
senes 071706 001670 . WORD L10055-. 
; 
10342 071710 004737 030264’ 80$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
10343 ; ERROR ? 
10344 071714 103010 Bcc 90$ ; NO 
10345 071716 FTL 
071716 004737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
10346 071722 ERRHRD 533. ,.ERROO6,MSGOO03 ; YES, REPORT ERROR 
071722 104456 TRAP CSERHRD 
071724 001025 -WORD 533 
071726 023030’ -WORD ERROOG 
071730 021736’ -WORD MSGOO3 
10347 071732 ESCAPE TST ; AND ABORT TEST 
071732 104410 TRAP CSESCAPE 
071734 001642 -WORD L19055-. 
10348 ; 
10349 ;WRITE PHYSICAL ADDRESS 
10350 
10351 071736 90$: 
10352 071736 012705 000272’ MOV ODFAULT,RS ; POINT TO DEFAULT PHYS. ADDRESS 
10353 071742 004737 032050’ JSR PC ,LDPHYA ; SAVE DEF PHY ADDR IN DEF TABLE 
10354 071746 012705 012500° MOV @WTPHYA,RS ; DEFAULT WRITE PHYSICAL ADDR FUNC 
10355 071752 004737 032002‘ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
10356 071756 012777 004100 106240 MOV #ONI! INTE, BPCSRO ; ENABLE INTERRUPTS 
10357 071764 112777 000102 106232 MOVB @INTE!GETCMD,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
10358 071772 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
10359 071776 103010 BCC 100$ ; YES 
10360 072000 FTL 
072000 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10361 072004 ERRHRD 534. ,ERRO1O,MSGO03 ; NO, REPORT ERROR 
072004 104456 TRAP CSERHRD 
072006 001026 -WORD 534 
072010 023331’ -WORD ERROIO 
072012 021736’ -WORD MSGO0O03 
10362 072014 ESCAPE TST ; AND ABORT TEST 
072014 104410 TRAP CSESCAPE 
— 072016 001560 -WORD 1L10055-. 
: 
10364 072020 004737 030264’ 1003: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
10365 ; ERROR ? 
10366 072024 103010 BCC 102$ ; NO 
10367 072026 FTL 
072026 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
10368 072032 ERRHRD 535. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
072032 104456 J 
072034 001027 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
072036 023030' -WORD ERROOG 
072040 021736’ .WORD M™SGO003 
10369 072042 ESCAPE TST ; AND ABORT TEST 
072042 104410 TRAP CSESCAPE 
072044 001532 -WORD L10055-. 
10370 3 
ree ;sWRITE MULTICAST ADDRESS LIST 
10373 072046 012705 012520° 1028: MOV @WTMULA,RS ; DEFAULT WRITE MULTICAST ADOR FUNC 
10374 072052 004737 032002’ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
10375 072056 012705 016074' MOV @MULTL RS ; LOAD LIST INTO UDBB 
10376 072062 012700 000036 MOV #30. ,RO ; LOAD 30 ENTRIES 
10377 072066 004737 032260' JSR PC ,LOUDBB ; MULTICAST LIST -> UDBB 
10378 072072 012777 004100 106124 MOV #ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 
10379 072100 112777 000102 106116 MOVB @INTE!GETCMD,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
10380 072106 004737 026550’ JSR PC , CHKDNI. ; DONI ? 
10381 072112 103010 BCC 104$ ; YES 
10382 072114 FTL 
072114 004737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
10383 072120 ERRHRD 536. ,ERRO1O,MSGOO3 ; NO, REPORT ERROR 
072120 104456 TRAP CSERHRD 
072122 001030 -WORD 536 
072124 023331' -WORD ERROI1O 
072126 021736' -WORD MSGO03 
10384 072130 ESCAPE TST ; AND ABORT TEST 
072130 104410 TRAP CSESCAPE 
— 072132 001444 -WORD L10055-. 
10386 072134 004737 030264' 104$: JSR PC ,.CLRONI ; WRITE ONE TO CLEAR ONI 
10387 ; ERROR ? 
10388 072140 103010 Bcc 106$ ; NO 
10389 072142 FTL 
072142 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
10390 072146 ERRHRD 537. ,ERROO6,MSGOO03 ; YES, REPORT ERROR 
072146 104456 TRAP CSERHRD 
072150 001031 -WORD 537 
072152 023030' -WORD ERROOG 
072154 021736’ -WORD MSGOOS 
10391 072156 ESCAPE TST ; AND ABORT TEST 
072156 104410 TRAP CSESCAPE 
sn 072160 001416 -WORD 1L10055-. 
—— :D0 TEN LOOPS WITH DEST ADDR = MULTICAST ADDRESS 
1 3 
10395 072162 106$: 
10396 072162 004737 030236' JSR PC ,CLRCV ; CLEAR RECEIVE BUFFER 
10397 072166 012704 000012 MOV #10. ,R4 ; DO LOOP = TEN 
pen 072172 012702 016074’ MOV @MULTL ,R2 ; R2 POINTS TO MULTICAST LIST 
4 ; 
aooee sSET UP RINGS FOR ONE BUFFER LOOPBACK 
a 
10402 072176 012705 014410° 110$: MOV #TORB1A,RS ; DEFAULT ONE BUFFER TRANSMIT RING 
10493 072202 004737 032164’ JSR PC ,LOTORB ; LOAD TORB 








SS 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
10404 072206 012705 012750' MOV #RORB1IA,RS ; DEFAULT ONE BUFFER RECEIVE RING 
oa 072212 004737 032070’ JSR PC ,LDRORB ; LOAD RDRB 
0406 ; 

peed ;SET UP BUFFERS AND START 

10409 072216 012701 00264’ MOV #SRC ,R1 ; SOURCE = PHYSICAL ADDRESS 

10410 072222 004737 0335206‘ JSR PC ,SRCDST ; DEST = MULTICAST ADDRESS 

10411 072226 005037 016562’ CLR DOCRC ; NO APPEND CRC 

10412 072232 012737 000006 016560' MOV #6 ,BYTCNT ; BYTES/PACKET 

10413 072240 004737 033006’ JSR PC ,SETBUF ; SET UP BUFFERS 

10414 072244 012777 004100 105752 MOV #ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 

10415 072252 112777 000104 105744 MOVB @INTE!START, @PCSRO ; ISSUE START PORT COMMAND 

10416 072260 004737 026550’ JSR PC ,CHKDNI ; ONI? 

10417 072264 103010 BCC 120$ ; YES 

10418 072266 FTL 
072266 004737 026652‘ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 

10419 072272 ERRHRD 540. ,ERRO12,MSGO03 ; NO, REPORT ERROR 
072272 104456 TRAP CSERHRD 
072274 001034 -WORD 540 
072276 023447’ -WORD ERROI2 
072300 021736’ -WORD MSGOO3 

10420 072302 ESCAPE TST ; AND ABORT TEST 
072302 104410 TRAP CSESCAPE 

anaes 072304 001272 -WORD L10055-. 

10422 072306 004737 030264’ 120$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 

10423 ; ERROR ? 

10424 072312 103010 BCC 130$ ; NO 

10425 072314 FTL 
072314 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

10426 072320 ERRHRD 541. ,ERROO6,.MSGOOS ; YES, REPORT ERROR 
072320 104456 TRAP CSERHRD 
072322 001035 -WORD 541 
072324 023030' -WORD ERROOG 
072326 021736’ | -WORD MSGOOS 

10427 072330 ESCAPE TST ; AND ABORT TEST 
072330 104410 TRAP CSESCAPE 

— 072332 001244 -WORD 1L10055-. 

10429 072334 004737 027566’ 130$: JSR PC ,CHKTXT ; TXI ? 

10430 072340 103010 BCC 140$ ; YES 

10431 072342 FTL 
072342 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL' BIT SET? 

£0432 072346 ERRHRD 542. ,ERRO13,MSGO03 ; NO, REPORT ERROR 
072346 104456 TRAP CSERHRD 
072350 001036 -WORD 542 
072352 023530’ -WORD ERRO1I3 
072354 021736’ -WORD MSGOO3 

10433 072356 ESCAPE TST ; AND ABORT TEST 
072356 104410 TRAP CS$ESCAPE 
072360 001216 -WORD L10055-. 


. —e, 








el 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
10434 3 
10435 072362 004737 030500’ 140$: JSR PC ,CLRTXI ; WRITE ONE TO CLEAR TxI 
10436 ; ERROR ? 
10437 072366 103010 BCC 150$ NO 
10438 072370 ' FTL 
072370 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
10439 072374 ERRHRD 543. ,ERRO14,MSGO03 ; YES, REPORT ERROR 
072374 104456 TRAP CSERHRD 
072376 001037 -WORD 543 
072400 023561' -WORD ERROI4 
072402 021736’ -WORD MSGOO3 
10440 072404 ESCAPE TST ; AND ABORT TEST 
072404 104410 TRAP CSESCAPE 
— 072406 001170 -WORD 1L10055-. 
; 
10442 072410 012705 0900620’ 150$: MOV #TORB,RS ; CHECK TORB OWNERSHIP 
10443 072414 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
10444 072420 103010 BCC 160$ ; YES 
10445 072422 FTL 
072422 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10446 072426 ERRHRD 544. ,ERRO18 ; NO, REPORT ERROR 
72426 104456 TRAP CSERHRD 
072430 001040 -WORD 544 
072432 024026’ -WORD ERRO18 
072434 000000 -WORD 0O 
10447 072436 ESCAPE TST ; AND ABORT TEST 
072436 104410 TRAP CSESCAPE 
sseen 072440 001136 -WORD 1L10055-. 
10449 072442 012705 016264' 160$: MOV #TDR14A,R5 ; POINT TO EXPECTED TORB 
10450 072446 004737 032370' JSR PC ,LDXTDR ; LOAD INTO XTDRBO TABLE 
10451 072452 012705 000620’ MOV #TORB RS ; CHECK TDRB 
10452 072456 004737 027500’ JSR PC ,CHKTDR ; ERRORS ? 
10453 072462 103010 BCC 170$ ; NO 
10454 072464 FTL 
072464 004737 026652' JSR PC .CHKFTL ; ‘FATL‘ BIT SET? 
10455 072470 ERRHRD 545. ,ERRO20,MSGO05 ; YES, REPORT EPROR 
72470 104456 TRAP CSERHRD 
072472 001041 -WORD 545 
072474 024206' -WORD ERRO2O 
072476 022042' -WORD MSGOO5 
10456 072500 ESCAPE TST ; AND ABORT TEST 
072500 104410 TRAP CSESCAPE 
— 072502 001074 -WORD L1i10055-. 
* + 
30458 07 004737 027316’ 170$: JSR PC ,CHKRXI ; RXI ? 
10459 072510 103010 BCC 180$ ; YES 
10460 072512 FTL 
072512 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 








nnn 





~~ « 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
10461 072516 ERRHRD 546. ,ERRO15,MSGOO3 ; NO, REPORT ERROR 
072516 104456 TRAP CSERHRD 
072520 001042 -WORD 546 
072522 023627’ «WORD ERROIS 
072524 021736’ -WORD MSGOO3 
10462 072526 ESCAPE TST ; AND ABORT TEST 
072526 104410 TRAP CSESCAPE 
_— 072530 001046 -WORD L10055-. 
10464 072532 004737 030432’ 180$: JSR PC ,CLRRXI ; WRITE ONE TO CLEAR RXI 
10465 ; ERROR ? 
10466 072536 103010 BCC 190$ ; NO 
10467 072540 FTL 
072540 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10468 072544 ERRHRD 547. ,ERRO16,MSGO03S ; YES, REPORT ERROR 
072544 104456 TRAP CSERHRD 
072546 001043 -WORD 547 
072550 023660‘ -WORD ERRO16 
072552 021736' -WORD MSGOO3 
10469 072554 ESCAPE TST ; AND ABORT TEST 
072554 104410 TRAP CSESCAPE 
spare 072556 001020 -WORD L10055-. 
; 
10471 072560 012705 000660‘ 190$: MOV @RORB.RS ; CHECK RDRB OWNERSHIP 
10472 072564 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
10473 072570 103010 BCC 200$ ; YES 
10474 072572 FTL 
072572 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
10475 072576 ERRHRD 550. ,ERRO17 ; NO, REPORT ERROR 
072576 104456 TRAP CSERHRD 
072600 001046 -WORD 550 
072602 023726' -WORD ERROI?7 
072604 000000 -WORD 0O 
10476 072606 ESCAPE TST ; AND ABORT TEST 
072606 104410 TRAP CSESCAPE 
seart 072610 000766 -WORD L10055-. 
: 
10478 072612 012705 016454‘ 2003: MOV #RDR2OC RS ; POINT TO EXPECTED RDRB 
10479 072616 004737 032340' JSR PC ,.LDXRDR ; LOAD INTO XRDRBO TABLE 
10480 072622 012705 000660’ MOV #RDRB , RS ; CHECK RDRB 
10481 072626 004737 027206' JSR PC ,CHKRDR ; ERRORS ? 
10482 072632 103010 BCC 210$ ; NO 
10483 072634 FTL 
072634 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10484 072640 ERRHRD 551. ,ERRO21,MSGO006 ; YES, REPORT ERROR 
072640 104456 RAP CSERHRD 
072642 001047 -WORD 551 
072644 024267' -WORD ERRO21 
072646 022204' -WORD MSGO06 
10485 072650 ESCAPE TST ; AND ABORT TEST 
TRAP CsESCAPE 





- « 
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072652 


072766 
072770 


072772 


072776 
073000 





000724 


013705 
004737 
103006 


104456 
001050 
024350’ 
022346 ' 


104410 
0006 76 


012705 
004737 
103006 


104456 
001051 
024417' 
022400’ 


104410 
000650 


012777 
112777 
004737 
103010 


004737 


104456 
001052 
024126’ 
021736’ 


104410 
000606 


004737 
103010 
004737 


104456 
001053 


016560’ 
030712' 


006472’ 
030642' 


004100 
000117 
026550’ 


026652’ 


030264 ' 


026652’ 


105266 
105260 
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EST 


; 
;COMPARE RBUF WITH TBUF 


2108: 


; 
220$: 


; 
230$: 


; 
2405: 


MOV BYTCNT RS 

JSR PC ,CMPDAT 

BCC 220$ 

ERRHRD 552. ,ERRO22,MSGO007 
ESCAPE TST 

MOV @RBUF +26. ,RS 

JSR PC ,.CMPCRC 

BCC 230% 

ERRHRD 553. ,ERRO23,MSGO08 
ESCAPE TST 

MOV #ONI! INTE, @PCSRO 
MOVB #INTE!STOP ,@PCSRO 
JSR PC ,CHKDNI 

BCC 240% 

FTL 

JSR PC ,.CHKFTL 

ERRHRD 554. ,ERRO19,MSGOOS 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 245% 

FTL 

JSR PC .CHKFTL 


ERRHRD 555. ,ERROO6,MSGO0S 


. WORD 
COMPARE DATA 
= COMPARE ERROR ? 
YES, REPORT ERROR 
TRAP 
-WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
-WORD 
CHECK CRC 
ERRORS ? 
NO 
YES, REPORT ERROR 
TRAP 
- WORD 
- WORD 
-WORD 
AND ABORT TEST 
TRAP 
- WORD 


ENABLE INTERRUPTS 

ISSUE STOP PORT COMMAND 
ONI ? 

YES 


‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 
=" 


‘FATL' BIT SET? 
YES, REPORT ERROR 


TRAP 





SEQ 330 


L10055-. 


CSESCAPE 
L10055-. 


CSERHRD 
554 
ERRO19 
MSGOO3 


CSESCAPE 
L10055-. 


CSERHRD 
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073010 
073012 
10516 073014 
073014 
073016 
10517 
10518 073020 
10519 073020 
10520 073024 


073162 
073164 


073170 
073172 


073172 


ee 
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023030’ 
021736’ 


104410 
000560 


030236‘ 
000006 
000004 


072176‘ 


000012 
016170' 


014410‘ 
032164 ' 
012750‘ 
032070' 


030264 ' 


026652 ' 


016560' 


105074 
105066 


é 
245%: 


; 
;00 TEN 


; 
246$: 


: 
;SET UP 


2503: 


SET UP 


; 
260$ : 


ESCAPE 
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TST 


PC ,CLRCV 
#6 ,R2 








SEQ 331 
-WORD ERROO6 
-WORD MSGO03 
AND ABORT TEST 
TRAP CSESCAPE 
. WORD L10055- ‘ 


CLEAR RECEIVE BUFFER 
UPDATE R2 


UPDATE R3 
<a TEN LOOPBACKS 


LOOPS WITH DEST ADDRESS = COMPLIMENTED MULTICAST ADDRESS 


MOV #10. .R4 

MOV @MULTLC,R2 

RINGS FOR ONE BUFFER LOOPBACK 
MOV #TORB1A,RS 

JSR PC ,LDTORB 

MOV @RORB1A,RS 

JSR PC ,LDRORB 

BUFFERS AND START 

MOV #SRC .R1 

JSR PC ,,SRCOST 

CLR DOCRC 

MOV #6 ,BYTCNT 

JSR PC ,SETBUF 

MOV @ONI! INTE , @PCSRO 
MOVB @INTE!START, @PCSRO 
JSR PC , CHKDNI 

Bcc 260% 

FTL 

JSR PC ,CHKFTL 

ERRHRD 556. ,ERRO12,MSGO0S 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 2708 

FTL 

JSR PC ,CHKFTL 


DO LOOP = TEN 
R2 POINTS TO COMPLIMENTED LIST 


DEFAULT ONE BUFFER TRANSMIT RING 
LOAD TORB 
DEFAULT ONE BUFFER RECEIVE RING 
LOAD RORB 


SOURCE = PHYSICAL ADDRESS 
DEST = COMPL MULTICAST ADDR 
NO APPEND CRC 

BYTES/PACKET 


ISSUE START PORT COMMAND 
DNI? 


YES 
‘FATL’' BIT SET? 
NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 556 
-WORD ERRO12 
-WORD MSGOOS 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10055-. 
WRITE ONE TO CLEAR ONI 


ERROR ? 
NO 


‘FATL' BIT SET? 
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TEST 23: ENABLE ALL MULTICAST MODE TEST 
10558 073176 ERRHRD 557. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
073176 104456 TRAP CSERHRD 
073200 001055 -WORD 557 
073202 023030’ -WORD ERROOG 
673204 021736’ -WORD MSGOOS 
10559 073206 ESCAP= TST ; AND ABORT TEST 
073206 104410 TRAP CSESCAPE 
snnne 073210 0003566 -WORD 1L10055-. 
: 
10561 073212 004737 027566‘ 270$: JSR FC CHK TXI ; TXI ? 
10562 073216 103010 BCC 2803 ; YES 
10563 073220 FTL 
073220 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
10564 073224 ERRHRD 560. ,ERRO13,MSGO03 ; NO, REPORT ERROR 
073224 104456 TRAP CSERHRD 
073226 001060 -WORD 560 
073230 023530’ -WORD ERRO13 
073232 021736’ -WORD MSGOOS 
10565 073234 ESCAPE TST ; AND ABORT TEST 
073234 104410 TRAP CSESCAPE 
sense 073236 000340 -WORD 1L10055-. 
i 
10567 073240 004737 030500’ 280$: JSR PC ,CLRTXI ; WRITE ONE TO CLEAR TXI 
10568 ; ERROR ? 
10569 073244 105010 BCC 290$ ; NO 
10570 07 FTL 
073246 004737 026652' JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10571 073252 ERRHRD 561. .ERRO14,MSGO0S ; YES, REPORT ERROR 
073252 104456 TRAP CSERHRD 
073254 001061 -WORD 561 
073256 023561' -VORD ERRO14 
073260 021736' -WORD MSGOOS 
10572 073262 ESCAPE TST ; AND ABORT TEST 
073262 104410 TRAP CSESCAPE 
—_— 073264 000312 -WORD L10055-. 
+ 
10574 073266 012705 000620' 290$: MOV #TORB,RS ; CHECK TORB OWNERSHIP 
10575 073272 004737 027024' JSR PC , CHKOWN ; OWN = PORT DRIVER ? 
10576 073276 103010 BCC 300% ; YES 
10577 073300 FTL 
073300 004737 026652’ JSR PC .CHKFTL ; '‘FATL’ BIT SET? 
10578 073304 ERRHRD 562. ,ERRO18 ; NO, REPORT ERROR 
073304 104456 TRAP CSERHRD 
073306 001062 -WORD 562 
073310 024026' -WORD ERRO18 
073312 -WORD 0O 
10579 073314 ESCAPE iST ; AND ABORT TEST 
073314 104410 TRAP CSESCAPE 
073316 000260 WIRD L10055-. 


10580 
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TEST 23: ENABLE 





SEQ 333 
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ALL MULTICAST MODE TEST 


10581 073320 012705 016264' 3003: MOV @TORI4A,R5 ; POINT TO EXPECTED TORB 
10582 073324 004737 032370° JSR PC ,LOXTOR ; LOAD INTO XTORBO TABLE 
10583 073330 012705 000620° MOV #TORB,RS ; CHECK TORB 
10584 073334 004737 027500° JSR PC ,.CHKTDOR ; ERRORS ? 
10585 073340 103010 BCC 420% ; NO 
10586 073342 FTL 
073342 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL’ BIT SET? 
10587 073346 ERRHRD 563. ,ERRO20,MSGOOS ; YES, REPORT ERROR 
073346 104456 TRAP CSERHRD 
073350 001063 -WORD 563 
073352 024206’ -WORD ERROZO 
073354 022042’ -WORD MSGOOS 
10588 073356 ESCAPE TST ; AND ABORT TEST 
073356 104410 TRAP CSESCAPE 
somes 073360 000216 -WORD L10055-. 
i 
10590 073362 004737 032422' 4203: JSR PC ,NORXI ; RXI ? 
10591 073366 103010 BCC 480$ ; NO 
10592 073370 FTL 
073370 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10593 073374 ERRHRD 564. ,ERRO39,MSGOOS ; YES, REPORT ERROR 
073374 104456 TRAP CSERHRD 
073376 001064 -WORD 564 
073400 025575' -WORD ERRO3S9 
073402 021736’ -WORD MSGOOS 
10594 073404 ESCAPE TST ; AND ABORT TEST 
073404 104410 TRAP CSESCAPE 
073406 000170 -WORD L10055-. 
10595 ; 
10596 073410 480$: 
10597 073410 012777 004100 104606 MOV @ONI ! INTE , @PCSRO ; ENABLE INTERRUPTS 
10598 073416 112777 000117 104600 MOVB #INTE! STOP ,@PCSRO ; ISSUE STOP PORT COMMAND 
10599 073424 004737 026550' JSR PC ,CHKDNI ; ONI ? 
10600 073430 103010 BCC 490$ ; YES 
10601 073432 FTL 
073432 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10602 073436 ERRHRD 565. .,ERRO19,MSGOOS ; NO, REPORT ERROR 
073436 104456 TRAP CSERHRD 
073440 001065 -WORD 565 
073442 024126' -WORD ERRO19 
073444 021736' -WORD MSGOOS 
10603 073446 ESCAPE TST ; AND ABORT TEST 
073446 104410 TRAP CSESCAPE 
. 073450 000126 -WORD L10055-. 
0604 ; 
10605 073452 004737 030264’ 490$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
10606 ; ERROR ? 
10607 073456 103010 BCC 495$ : 
10608 073460 FTL 
073460 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 





ee a aa 
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10609 073464 
07 


10618 
10619 


64 


073516 
07352C 


073524 
073524 


073530 
073530 
073532 


073572 


073576 
073576 
073576 


104401 


030236 ' 
000006 
000004 


073054’ 


020346 ' 
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; 
4955: 


; 
500$: 


ERRHARD 566. ,ERROOG, MSGO03 


ESCAPE TST 

JSR PC,CLRCV 
ADD #6 ,R2 

ADD #4 ,RS 

DEC R4 

BEQ 500$ 

JMP 250% 

JSR PC ,,CLINTR 
EXIT TST 


;LOCAL TEST MESSAGE 


T231D: .ASCIZ ‘DELUA ENABLE ALL MULTICAST MODE ' 


-EVEN 


ENDTST 


YES, REPORT ERROR 
AND ABORT TEST 


CLEAR RECEIVE BUFFER 
TE R2 


R3 
DONE TEN LOOPBACKS 7? 
YES 


INSURE DELUA INTR BITS CLEAR 





SEQ 334 


CSERHRD 
566 


ERROOG 
MSGO03 


CSESCAPE 
L10055-. 


CSExIT 
L10055-. 


CSETST 








10668 073672 
073672 


004737 


075162’ 
032734' 


033434‘ 


004100 
000140 
027736' 


026652' 


030264’ 


026652 ' 





ee eS LL ——— 


HARDWARE TESTS MACRO ‘05.02 Fride 
TEST 23: ENABLE ALL MULTICAST MODE 
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EST 
.SBTTL TEST 24: INTERNAL LOOPBACK TRANSMIT LENGTH ERROR TEST 
sPRERERESAREAEEEEEAEEAEERESEAEDEEEEE ERED EEEEADEEEAEE DEDEDE EE ES EEEEEEEEOEE 
: 
: THIS TEST VERIFIES THAT, IF THE PORT DRIVER ATTEMPTS TO 
: TRANSMIT GREATER THAN 32 BYTE <DTCR = O>, OR 36 BYTE <DTCR = 1> 
; TRANSMIT FRAME, THE DEVICE WILL RETURN A ‘TRANSMIT LENGTH’ ERROR. 
; 
: TEST SEQUENCE: 
; 1. WRITE MODE REGISTER = INTERNAL LOOPBACK, PROM MODE 
' 2. WRITE RING FORMAT 
: 3. WRITE PHYSICAL ADDRESS 
; 4. SET UP RINGS AND BUFFERS 
; 5. ISSUE START 
: 6. CHECK FOR BUFFER LENGTH ERROR IN TORB+6 
PETTITT TTT eT TT TT TTT TT eSTT TTT TTCTTTTTTTTTTT TTT TTT TT TTT TT TTT TT TTT TTT Ty 
BGNTST 
T24:: 
PNTMAC T24ID 
MOV @T24ID ,R4 ;GET POINTER TO TEST NAME MESSAGE 
JSR PC ,PNTIO sPRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 30$ ; NO 
104400 MOV @ONI! INTE, @PCSRO sENABLE INTERRUPTS 
104372 MOVB #INTE!RSET ,@PCSRO ; YES, RESET DELUA 
JSR PC ,CKDNI ; ONI ? 
BCC 20% ; YES 
FTL 
JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 567. ,ERKOCS,MSGOO3 ; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 567 
-WORD ERROOG 
-WORD ™SGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L110056- 
; t 
208: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
; ERROR ? 
BCC 30$ ; NO 
FTL 
JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 570. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
TRAP CSERHRD 
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0 
10669 pot La 


10670 
10671 


73702 
073704 


073706 


10672 073706 
10673 073712 


74 


1070 
10702 


L 


073770 


073774 
073776 


073776 


4030 
074034 








SEQ 336 


570 
ERROO6 
MSG003 


CSESCAPE 
L10056-. 


001072 . WORD 
023030’ . WORD 
021736’ . WORD 
ESCAPE TST ; AND ABORT TEST 
104410 TRAP 
001336 . WORD 
308 
004737 031732’ JSR PC ,LDDFLT ; LOAD DEFAULT PHY. ADDRESS TABLES 
012704 000001 -_ MOV @1 ,R4 ; INIT PASS COUNTER 
004737 030212’ JSR PC , CLRBUF ; CLEAR TBUF AND RBUF 
004737 032032’ JSR PC ,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 
012777 004100 104270 MOV PONI! INTE, @PCSRO ; ENABLE INTERRUPTS 
112777 000101 104262 MOVB #INTE!GETPCB ,@PCSRO ; ISSUE GET_PCBB PORT COMMAND 
004737 026550’ JS PC , CHKDNI ; ONI? 
103010 BCC 40$ ; YES 
FIL 
004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
ERRHRD 571. ,ERROO9,MSGOOS ; NO, REPORT ERROR a 
001073 . WORD 
023245 ' . WORD 
021736’ WORD 
ESCAPE TST ; AND ABORT TEST 
104410 TRAP 
001254 . WORD 
; 
004737 030264' 40$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
; ERROR ? 
103010 BCC 50$ ; NO 
FTL 
004737 026652’ JSR PC ,CHKFTL 3; ‘FATL’ BIT SET? 
ERRHRD 572. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
104456 TRAP 
001074 . WORD 
3030' . WORD 
021736’ - WORD 
ESCAPE TST ; AND ABORT TEST 
104410 TRAP 
001226 . WORD 
50$: 
;WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 
:IF 2ND PASS SKIP iST PASS PCBB SETUP 
005304 DEC Ra ;ADJUST PASS COUNT 
005704 TST R4 31ST PASS 
100425 BMI 55% 3NO, SKIP THIS SETUP 
012705 012600’ MOV OWTMODE , RS ; WRITE MODE FUNCTION (NO CRC) 
004737 032002’ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
012777 004100 104162 MOV @ONI! INTE, @PCSRO ; ENABLE INTERRUPTS 
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10703 074042 
10704 074050 
10705 074054 
10706 074056 

074056 


10707 074062 
07 


074066 
074070 
10708 074072 
074072 
074074 
10709 
10710 074076 
10711 
10712 
10713 
10714 074076 
10715 074102 
10716 074106 
10717 074114 
10718 074122 
10719 074126 
10720 074130 
074130 
10721 074134 
074134 
074136 
074140 
074142 
10722 074144 
074144 
074146 
10723 
10724 074150 
pe ba 074150 


10726 
10727 074154 
10728 074156 


074156 
10729 074162 
074162 
074164 
074166 
074170 
40730 074172 
074172 
074174 


10731 
10732 


L 


000102 104154 
026550‘ 


026652’ 


030264 ' 


026652’ 


LENGTH ERROR TEST 


104110 
104102 


MOV8 
JSR 
Bcc 
FTL 
JSR 


ESCAPE 
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LOOPBACK TRANSMIT 


@INTE!GETCMD ,OPCSRO 
— 


PC ,CHKFTL 
573. ,ERRO1O, MSGO03S 


TST 


;2ND PASS PCBB SETUP 


ESCAPE 


FTL 


ESCAPE 


@wTMOD2 . RS 

PC ,.LDPCBB 

@ONI! INTE, BPCSRO 
@INTE!GETCMD , BPCSRO 
- | cae 


PC .CHKFTL 
574. ,ERRO1O, MSGO0S 


TST 
PC ,CLRONI 
70$ 
PC ,CHKFTL 


575. ,.ERROOG , MSGOOS 


TST 


; 
sWRITE RING FORMAT 





; YES 


; ‘FATL’' BIT SET? 
; NO, REPORT ERROR 


; AND ABORT TEST 


s;DEFAULT MODE FUNCTION 
sLOAD FUNCTION -> PCBB 


sENABLE INTERRUPTS 


ISSVE GET_CMD PORT COMMAND 
ONI ? 


sISSUVE GET_CMD PORT COMMAND 


sONI? 
;YES, SKIP ERROR REPORT 


; ‘FATL’ BIT SET? 
s3NO, REPORT ERROR 


; AND ABORT TEST 


3; ‘FATL’ BIT SET? 
; YES, REPORT ERROR 


; AND ABORT TEST 


;WRITE ONE TO CLEAR ONI 
RROR? 


SEQ 337 
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074176 
074202 
0746206 
074212 
074216 
074222 
074230 
074236 
074242 
074244 


074244 


074250 
074250 
074252 
074254 
074256 
074260 
074260 
074262 


074264 


074270 
074272 


074272 


074276 
074276 
074300 
074302 
074304 
074306 
074306 
074310 


756 074312 


re 
oe 


074312 
074316 
074322 
074326 
074332 
074340 
074346 
074352 
074354 


074354 
074360 


074360 
074362 
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012705 
004737 
012705 
004737 
012777 
112777 
004737 
103010 


004737 


104456 
001130 


026652’ 


030264 ' 


026652 ' 


000272’ 


¥20102 
026550’ 


026652' 


103774 
103766 


70$: 


: 
80$: 


; 
;WRITE PHYSICAL 


ESCAPE 


JSR 


@WTRNGS,RS 


PC ,LDUDBB 

@ONI! INTE, @PCSRO 
@INTE!GETCMD,@PCSRO 
PC ,CHKONTI 

80$ 

PC ,CHKFTL 


576. ,ERRO10,MSGO03 


TST 


PC ,.CLRONI 
90$ 


PC .CHKFTL 
577. ,ERROO6 .MSGOO0S 


TST 


ADDRESS 


@DFAULT.RS 

PC ,.LDPHYA 
GUTPHYA,RS 

PC ,.LDPCBB 

#ONI INTE, @PCSRO 
#INTE!GETCMO,,aPCSRO 
PC ,CHKONI 

100$ 


PC ,CHKFTL 


ERRHRD 600. ,ERRO10,MSGOO0S 


ae a ee 





SEQ 336 


DEFAULT WRITE RING FORMAT FUNCTION 
LOAD FUNCTION -> PCBB 

DEFAULT RING FORMAT 

FORMAT = SIX WORDS 

LOAD RING FORMAT -> UDBB 

ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 


ONI ? 
YES 
; ‘FATL’ BIT SET? 
; NO, REPORT ERROR 
TRAP CSERHRD 
-WORD 576 
-WORD ERRO1O 
-WORD MSGOO03 
; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10056-. 
; WRITE ONE TO CLEAR DONI 
; ERROR ? 
NO 
; ‘FATL’ BIT SET? 
; YES, REPORT ERROR 
TRAP CSERHRD 
. WORD 7 
-WORD ERROOG 
-WORD MSGOO3 
; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10056-. 


POINT TO DEFAULT PHYS. ADDR 

SAVE IN DEFAULT TABLE 

DEFAULT WRITE PHYSICAL ADDR FUNC 
LOAD FUNCTION -> PCBB 

ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 

DNI ? 
YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 
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SEQ 339 


074364 023331' -WORD ERRO1O 
074366 021736' -WORD MSGOO3 
10767 074370 ESCAPE TST ; AND ABORT TEST 
074370 104410 TRAP CSESCAPE 
onnte 074372 000650 -WORD 110056-. 
10769 074374 004737 030264’ 100%: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
10770 ; ERROR ? 
10771 074400 103010 BCC 110$ ; NO 
10772 074402 FTL 
074402 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
10773 074406 ERRHRD 601. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
074406 104456 TRAP CSERHRD 
074410 001131 -WORD 601 
074412 023030’ -WORD ERROOG 
074414 021736’ -WORD MSGOO3 
10774 074416 ESCAPE TST ; AND ABORT TEST 
074416 104410 TRAP CSESCAPE 
one 974420 000622 -WORD 110056-. 
: 
po ;SET UP RINGS FOR ONE BUFFER LOOPBACK 
1 
10778 074422 012705 014510' 110$: MOV #TORB1IC.RS ; DEFAULT ONE BUFFER TRANSMIT RING 
10779 074426 004737 032164’ JSR PC .LDTORB ; LOAD TORB 
10780 074432 012705 012750’ MOV @RDRB1A,RS ; DEFAULT ONE BUFFER RECEIVE RING 
po bes 074436 004737 032070’ JSR PC .LDRORB ; LOAD RORB 
; 
fetes ;SET UP BUFFERS AND START 
ped ;IF 1ST PASS WILL LOAD FOR 32 BYTE PACKET, NO CRC 
10 
10787 074442 005704 TST R4 31ST PASS? 
10788 074444 100405 BMI 115$ ;NO, SKIP 1ST PASS SETUP 
10789 074446 012702 000016 MOV #14. .R2 sPACKET SIZE (WORDS), NO CRC TO BE ADDED 
10790 074452 005037 016562’ CLR DOCRC NO CRC 
10791 074456 000410 BR 117$ ;SKIP 2ND PASS SETUP 
10792 074460 115$: 
10793 074460 012705 014530’ MOV #TORB1D.RS ;SETUP BUFFER TRANSMIT RING 
10794 074464 004737 032164’ JSR PC ,LOTORB ;LOAD TORB 
10795 074470 012702 000016 MOV #14. ,R2 s;PACKET SIZE (WORDS) CRC TO BE ADDED 
10796 074474 005037 016562’ CLR DOCRC ; TRANSMITTER TO ADD CRC 
10797 074500 117$: 
10798 074500 004737 032544’ JSR PC ,SETBF ;LOAD HEADER AND DATA 
10799 074504 012777 004100 103512 MOV #ONI! INTE. @PCSRO ; ENABLE INTERRUPTS 
10800 074512 112777 000104 103504 MOVB @INTE! START, @PCSRO ; ISSUE START PORT COMMAND 
10801 074520 004737 026550’ JSR PC ,CHKDNI ; DNI? 
10802 074524 103010 BCC 120$ ; YES 
£0803 074526 FTL 
074526 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL‘ BIT SET? 
10804 074532 ERRHRD 602. ,ERRO12,MSGO03 ; NO, REPORT ERROR 
074532 104456 RAP CSERHRD 
074534 001132 -WORD 602 
074536 023447’ -WORD ERRO12 
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10805 


074540 
074542 
074542 
074544 


074546 


074572 
074574 


021736‘ 


104410 
0004 76 


004737 
103010 


004737 


004737 030236’ 
005704 


030264’ 


026652 ' 


027566‘ 


026652 ' 


030500' 


026652‘ 


5 
120%: 


i 
130$: 


1408: 


31ST PASS CHECK 
150$: 


ESCAPE 


ESCAPE 


TST 


PC ,CLRONI 
130$ 


PC ,CHKFTL 
603. ,ERROO6 ,MSGO03 


TST 
PC ,CHKTXI 
140$ 


PC .CHKFTL 
604. ,ERRO13,MSGO03 


TST - 


PC ,CLRTXI 
150$ 


PC .CHKFTL 


605. ,ERRO14, MSGO03 


TST 


PC ,CLRCV 
R4 


a ere eS TL 


. WORD 


TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 


AND ABORT TEST 


; 
; ERROR ? 
NO 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 
TXI ? 
YES, SKIP ERROR REPORT 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
WRITE ONE TO CLEAR TXI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


CLEAR RECEIVE BUFFER 
1ST PASS? 





SEQ 340 


MSGOO3 


CSESCAPE 
L10056-. 


CSESCAPE 
L10056-. 


CSERHRD 
604 


ERRO13 
MSGOO03 


CSESCAPE 
L10056-. 


CSESCAPE 
L10056-. 





eS LL 
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10832 


re 


074656 


074660 
074664 


074764 
074770 
074772 
074774 


074774 


100436 


012705 
004737 


013700 
005700 
100410 


004737 


104456 
001136 
026076’ 
000000 


104410 
000324 


012705 
004737 
103046 


004737 


104456 
001137 
024206’ 
022042' 


104410 
000272 
000435 


012705 
004737 


016354’ 
032370° 


000626 ' 


026652 ' 


000620' 
027500' 


026652‘ 


016364 ' 
032370' 


000626 ' 


026652 ' 


BMI 


MOV 
JSR 


165$ 


@TOR24A,R5 


PC ,,LOXTDR 





SEQ 341 


; NO, SKIP 1ST PASS CHECK 


; POINT TO EXPECTED TORB 
; LOAD INTO XTORBO TABLE 


;PERFORM SPECIFIC CHECK THAT ‘BUFL‘ SET IN TDORB+6, THEN 


; CHECK OTHER TORB PARAMETERS. 


155$: 


ESCAPE 


BR 
32ND PASS CHECK 
165$: 


MOV 
JSR 


TORB+6,RO 
RO 
155$ 


PC ,CHKFTL 


€06. ,ERRO43 


TST 


#TORB.RS 
PC ,CHK TOR 
170$ 


PC .CHKFTL 


607. ,ERRO20,MSGOO0S 


170$ 


#TOR24B,R5 


PC ,.LDXTOR 


TORB +6 ,RO 
RO 
167$ 


PC ,CHKFTL 


; GET CONTENTS OF TORB+6 
; ‘BUFL’ ,BIT15 SET? 
; YES, SKIP ERROR CHECK 


‘FATL’' BIT SET? 


; REPORT ERROR 
TRAP CSERHRD 
-WORD 606 
-WORD ERRO43 
-WORD O 

; AND EXIT TEST 
TRAP CSESCAPE 
-WORD L10056-. 

; CHECK TORB 

; ERRORS ? 

; NO 


‘FATL’ BIT SET? 
; YES, REPORT ERROR 


WORD 607 
-WORD ERRO2O 
WORD MSGOOS 
; AND ABORT TEST 
TRAP CSESCAPE 
L10056- 


SKIP 2ND PASS CHECK 


sPOINT TO EXPECTED TORB 
;LOAD INTO XTORBO TABLE 


sINSURE THAT ‘BUFL‘ BIT SET IN TORB+6, THEN CHECK REMAINDER 
OF TORB+6. 


;GET CONTENTS OF TDRB+6 
;'BUFL', BIT15 SET IN TORB+6? 
;YES, SKIP ERROR REPORT 


; ‘FATL’ BIT SET? 





_. —_sssssszssse,rsssssstasasssmamamt le | LL LLL LLL LLL LL, 
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10868 075000 


10883 075070 
075070 


10884 075074 
075074 
075076 
075100 
075102 

10885 075104 
075104 
075106 


10887 075110 


10889 075114 
10890 075116 


075116 
10891 cata 


0 
10892 075132 
075132 


: ees SE 


104456 
001142 
026175’° 
000000 


000620’ 
027500‘ 


026652’ 


004100 103150 
000117 103142 
026550' 


026652 ' 


030264 ' 


026652' 


167$: 


170$: 


180$: 


ERRHRD 610. ,ERRO44 


3NO, REPORT ERROR 


ESCAPE TST 

MOV @TORB,RS 

JSR PC ,CHKTDR 

BCC 170$ 

FTL 

JSR PC .CHKFTL 

ERRHRD 611. ,ERRO20,MSGOO5 


ESCAPE 


ESCAPE 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


TST 


@#DNI ! INTE, @PCSRO 
#INTE! STOP ,a@PCSRO 
PC ,CHKONI 

180$ 


PC ,CHKFTL 
612. ,ERRO19, MSGO03 


TST 


PC ,CLRONI 
190$ 


PC ,CHKFTL 
613. ,ERROO6, MSGO03 


TST 


TRAP 
. WORD 
. WORD 
.WORD 
; AND EXIT TEST 
TRAP 
. WORD 
;CHECK TORB 
;ERRORS? 
;NO 
; ‘FATL’ BIT SET? 
;YES, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 
; AND ABORT TEST 
RAP 
- WORD 


ENABLE INTERRUPTS 
ISSUE STOP PORT COMMAND 


ONI ? 

YES 

‘FATL’ BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR ONI 
a ? 


‘FATL’' BIT SET? 
YES, REPORT ERROR 
RAP 
. WORD 
. WORD 
‘ . WORD 
AND ABORT TEST 
TRAP 





SEQ 342 


CSESCAPE 
L10056-. 


CSESCAPE 
L10056-. 


CSERHRD 


CSESCAPE 





eS LL LL 
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075134 000106 a “. 
10893 075136 190$: = 
10894 
peo oe ;IF DONE ONLY 1 PASS MUST GO FOR 2ND 
10897 075136 004737 030236’ JSR PC ,CLRCV ;CLEAR RECEIVE BUFFER 
10898 075142 005704 TST R4 ;2ND PASS? 
10899 075144 100402 BMI 200% ;YES, EXIT TEST 
10909 075146 000137 073716‘ JMP 35$ ;NO, DO 2ND PASS 
10901 075152 2003: 
rte 075152 004737 030346’ JSR PC ,CLINTR ;INSURE DELUA INTR BITS CLEAR 
10904 075156 EXIT TST 
075160 000062 "WORD 10056 
° L10056-. 
10905 
Jette: ;LOCAL TEST MESSAGE 
10908 075162 104 105 114 T24ID:.ASCIZ ‘DELUA INTERNAL LOOPBACK TRANSMIT LENGTH ERROR ' 
075165 125 101 040 
075170 111 116 124 
075173 105 122 116 
075176 101 114 040 
075201 114 117 117 
075204 120 102 101 
075207 103 113 040 
075212 124 122 391 
075215 116 123 115 
075220 111 124 040 
075223 114 105 116 
075226 107 124 110 
075231 040 105 122 
075234 122 117 122 
075237 040 000 
10909 -EVEN 
10910 
10911 075242 ENDTST 
075242 L10056: 
075242 104401 TRAP CSETST 
10912 
10913 
10914 
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10953 


: aan 


075310 
075310 
075312 
075314 
075316 
075320 
075320 
075322 


075324 


075332 
075332 


077072! 
032734' 


033434’ 


004100 
000140 
027736' 


026652 ' 


030264 ' 


026652 ' 


° 
‘ 
é 
; 
; 
. 
‘ 
5 
: 
i 
: 
3 
; 
, 
3 
° 
5 


TEST SEQUENCE: 


BGNTST 


PNTMAC 


MOV 
JSR 


ESCAPE 


FTL 








SEQ 344 
.SBTTL TEST 25: SIMULTANEOUS OPERATIONS TEST 
sRRRSAbEREEEEARELAEEEEEEEEDASSEAEAEAESEDEESERESEEESEEREEEEEEDENEEDEEEEDEEE 
THIS TEST VERIFIES THAT SIMULTANEOUS OPERATIONS CAN BE PERFORMED. 
AN INTERNAL LOOPBACK WILL BE PERFORMED SIMULTANEOUSLY WITH A READ 
COUNTERS PORT FUNCTION. 
1. WRITE MODE REGISTER = PROM and INTERNAL LOOPBACK MODE 
2. WRITE RING FORMAT 
3. WRITE PHYSICAL ADDRESS 
4. SET UP RINGS AND BUFFERS 
5S. SET UP READ COUNTERS FUNCTION 
6. ISSUE START 
7. ISSUE GET COMMAND PORT COMMAND 
8. CHECK FOR ERRORS 
9. ISSUE STOP 
RAAARAKARAEAERAERESEEREEEEEEEAEEEEEEEEEDEEEEAEEEEEEEEEEEKEEEEEEEEEEEE EES 
T25:: 
T251ID 
#T25ID,.R4 ;GET POINTER TO TEST NAME MESSAGE 
PC ,PNTID ;sPRINT TEST NUMBER AND NAME 
END OF MACRO EXPANSION OF ‘PNTMAC‘ 
» aaa ; fe A DEVICE RESET NEEDED? 
é 
@DNI! INTE, BPCSRO ; ENABLE INTERRUPTS 
GINTE!RSET ,@PCSRO ; YES, RESET DELUA 
~CKONI — ; DNI ? 
20$ ; YES 
PC .CHKFTL ; ‘FATL' BIT SET? 
614. ,ERROO6,MSGO03 ; NO, REPORT ERROR 
TRAP CSERHRD 
- WORD 14 
-WORD ERROOG 
-WORD MSGOO3 
TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD L10057-. 
PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
; ERROR ? 
30$ ; NO 
ee 
PC .CHKFTL ; ‘FATL’ BIT SET? 
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10954 075336 ERRHRD 615. ,ERROO6,MSGOO3 ; YES, REPORT ERROR 
075336 104456 TRAP § CSERHROD 
075340 001147 .WORD 615 
075342 023030° .WORD ERROOG 
075344 021736’ WORD MSGOO3 

10955 075346 ESCAPE TST ; AND ABORT TEST 
07 104410 TRAP  CSESCAPE 
075350 001562 .WORD 110057-. : 

; 

10957 075352 30$: 

10958 075352 004737 12° JSR PC ,CLRBUF ; CLEAR TBUF AND RBUF 

10959 075356 004737 031732’ JSR PC ,LDDFLT ; LOAD DEFAULT PHY. ADORESS TABLES 

10960 075362 004737 032032’ JSR PC,LDPCSR ; ADDRESS OF PCBB -> PCSR2!3 

10961 075366 012777 004100 102630 MOV @DNI! INTE, SPCSRO ; ENABLE INTERRUPTS 

10962 075374 112777 000101 102622 MOVB ##§ #INTE!GETPCB,@PCSRO ; ISSUE GET_PCBB PORT COMMAND 

10963 075402 004737 026550’ JSR PC, CHKDNI ; DNI? 

10964 07 103010 Bcc 40$ ; YES 

10965 075410 FTL 
075410 004737 026652' JSR PC, CHKFTL ; ‘FATL’ BIT SET? 

10966 075414 ERRHRD 616. ,ERROO9,MSGOO3 ; NO, REPORT ERROR 
075414 104456 TRAP §§ CSERHRD 
075416 001150 .WORD 616 
075420 023245' -WORD ERROOD 
075422 021736’ .WORD MSGO03 

10967 075424 ESCAPE TST ; AND ABORT TEST 
075424 104410 TRAP CSESCAPE 

atti 075426 001504 -WORD 110057-. 

10969 075430 004737 030264: 40$: JSR PC ,CLRDNI ; WRITE ONE TO CLEAR DNI 

10970 ; ERROR ? 

10971 075434 103010 Bcc 50$ ; NO 

10972 075436 FTL 
075436 004737 026652' JSR PC,.CHKFTL ; 'FATL’ BIT SET? 

10973 075442 ERRHRD 617. ,ERROOG,MSGO03 ; YES, REPORT ERROR 
075442 104456 TRAP § CSERHRD 
075444 001151 .WORD 617 
075446 023030! .WORD ERROOG 
075450 021736‘ .WORD MSGOO3 

10974 075452 ESCAPE TST ; AND ABORT TEST 
075452 104410 TRAP  CSESCAPE 

ati 075454 001456 .WORD 1L10057-. 

a 

10976 ;WRITE MODE REGISTER = INTERNAL LOOPBACK AND PROM MODE 

10978 075456 012705 012600° 50s: MOV @WTMODE ,RS ; DEFAULT WRITE MODE FUNCTION 

10979 075462 004737 032002’ JSR PC,LOPCBB ; LOAD FUNCTION -> PCBB 

10980 075466 012777 004100 102530 MOV #ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 

10981 075474 112777 000102 102522 MOVB § #INTE!GETCMD,@PCSRO ; ISSUE GET_CMD PORT COMMAND 

10982 075502 004737 026550’ JSR PC, CHKONI ; DNI ? 

10983 075506 103010 BCC 60$ ; YES 

10984 075510 FTL 
075510 004737 026652' JSR PC ,CHKFTL ; 'FATL’ BIT SET? 


—— ean 
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10985 075514 ERRHRD 620. ,ERRO10,MSGOO03 ; NO, REPORT ERROR 
075514 104456 TRAP CSERHRD 
075516 001154 -WORD 620 
075520 023331‘ -WORD ERRO1O 
075522 021736’ -WORD MSGOO03 
10986 075524 ESCAPE TST ; AND ABORT TEST 
075524 104410 TRAP CSESCAPE 
— 075526 001404 -WORD 110057-. 
; 
10988 075530 004737 030264’ 60$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
10989 ; ERROR ? 
10999 075534 103010 BCC 70$ ; NO 
10991 075536 FTL 
075536 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
10992 075542 ERRHRD 621. ,ERROO6,MSGOOS ; YES, REPORT ERROR 
075542 104456 TRAP CSERHRD 
075544 001155 -WORD 621 
075546 023030’ -WORD ERROOG 
075550 021736' -WORD MSGOOS 
10993 075552 ESCAPE TST ; AND ABORT TEST 
075552 194410 TRAP CSESCAPE 
075554 001356 -WORD 110057-. 
10994 : 
10995 ;WRITE RING FORMAT 
10996 075556 012705 012540’ 70$: MOV @WTRNGS RS ; DEFAULT WRITE RING FORMAT FUNCTION 
10997 075562 004737 032002’ JSR PC ,LOPCBB ; LOAD FUNCTION -> PCBB 
10998 075566 012705 012734’ MOV RMTE.RS ; DEFAULT RING FORMAT 
10999 075572 012700 MOV #6 .RO ; FORMAT = SIX WORDS 
11000 075576 004737 032260’ JSR PC ,LDUDBB ; LOAD RING FORMAT -> UDBB 
1100) 07 012777 004100 102414 MOV @ONI! INTE , @PCSRO sENABLE INTERRUPTS 
11002 075619 112777 000102 102406 MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
11003 075616 004737 026550' JSR PC .CHKDNI ; ONI ? 
11004 075622 103010 BCC 80s ; YES 
11005 075624 FTL 
075624 004737 026652' JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
11006 075630 ERRHRD 622. ,ERRO10,MSGOOS ; NO, REPORT ERROR 
075630 104456 TRAP CSERHRD 
075632 001156 -WORD 622 
075634 023331’ -WORD ERRO1O 
075636 021736' . MSGO03 
11007 075640 ESCAPE TST ; AND ABORT TEST 
075640 104410 TRAP CSESCAPE 
— 075642 001270 -WORD 1L10057-. 
; 
11009 075644 004737 030264’ 80$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
11010 ; ERROR ? 
41011 075650 103010 BCC 90$ ; NO 
11012 075652 FTL 
075652 004737 026652' JSR PC ,CHKFTL ; 'FATL’ BIT SET? 
11013 075656 ERRHRD 623. ,ERROO6,MSGOO0S ; YES, REPORT ERROR 








ee RE <a mc ae 


—D ee 
& ne 
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075656 104456 TRAP CSERHRD 
075660 001157 . WORD 3 
075662 023030° -WORD ERROOG 
075664 021736’ | -WORD MSGOOS 
11014 075666 ESCAPE TST ; AND ABORT TEST 
07 104410 TRAP CSESCAPE 
_ 075670 001242 -WORD L10057-. 
11016 ;WRITE PHYSICAL ADDRESS 
11017 
11018 075672 90$: 
11019 075672 012705 000272’ MOV #DFAULT,RS ; POINT TO DEFAULT PHYS. ADDRESS 
11020 075676 004737 032050’ JSR PC ,LDPHYA ; SAVE IN DEFAULT ADDR TABLE 
11021 075702 012705 012500’ MOV @WTPHYA,RS ; DEFAULT WRITE PHYSICAL ADDR FUNC 
11022 075706 004737 032002’ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 
11023 075712 012777 004100 102304 MOV #ONI ! INTE, @PCSRO ; ENABLE INTERRUPTS 
11024 075720 112777 000102 102276 MOVB #INTE!GETCMD , @PCSRO ; ISSUE GET_CMD PORT COMMAND 
11025 075726 004737 026550’ JSR PC ,CHKONI ; DNI ? 
11026 075732 103010 BCC 100$ ; YES 
11027 075734 FTL 
075734 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11028 075740 ERRHRD 624. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
075740 104456 TRAP CSERHRD 
075742 001160 WORD 624 
075744 023331’ -WORD ERROIO 
075746 021736' -WORD MSGOOS 
11029 075750 ESCAPE TST ; AND ABORT TEST 
075750 104410 TRAP CSESCAPE 
ssene 075752 001160 -WORD 1L10057-. 
i 
11031 075754 004737 030264’ 100$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
11032 ; ERROR ? 
11033 075760 103010 BCC 110% ; NO 
11034 075762 FTL 
075762 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11035 075766 ERRHRD 625. ,ERROOG,MSGO0S ; YES, REPORT ERROR 
075766 104456 TRAP CSERHRD 
075770 001161 . WORD 5 
075772 023030 -WORD ERROOG 
075774 021736' -WORD MSGOOS 
11036 075776 ESCAPE TST ; AND ABORT TEST 
75776 104410 TRAP CSESCAPE 
33087 076000 001132 -WORD 1L10057-. 
; 
ts ;SET UP RING BUFFER LOOPBACK 
11040 076002 012705 014740’ 110$: MOV @TORBXX,RS ; DEFAULT BUFFER TRANSMIT RING 
41041 076006 004737 032222’ JSR PC ,LDTORX ; LOAD TORB 
11042 076012 012705 013570’ MOV @RORBXX,RS ; DEFAULT BUFFER RECEIVE RING 
toe 076016 004737 032126' JSR PC ,LDRORX ; LOAD RDRB 
: 
11045 ;SET UP BUFFERS 
11046 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 


076114 


076116 
076116 
076122 
076124 


076124 


012777 


112777 


112777 000002 102052 


004737 026550 


016562’ 
000006 


033006 ' 


175400 
000004 
026550 ' 


026652’ 


030264 ' 


026652’ 





016560’ 


102142 


102134 
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DOCRC 
06 ,BYTCNT 
PC ,SETBUF 


;SET UP READ COUNTERS FUNCTION 


MOV 
JSR 
CLR 


@ROCNT RS 
PC ,LDPCBB 
UDBB +4 


;CLEAR INTERRUPT BITS 


MOV 


; 
;ISSUE START 
MOVB 


112$: 


ESCAPE 


ESCAPE 


#CLINTB, @PCSRO 


@START ,@PCSRO 
PC ,CHKONI 
112$ 


PC ,CHKFTL 
626. ,ERRO12,MSGO03 


TST 


PC ,CLRONI 
113% 


PC ,CHKFTL 
627. ,ERROO6,MSGO03 


TST 


; NO APPEND CRC 
; BYTES/PACKET 
; SET UP BUFFERS 


DEFAULT READ COUNTERS FUNCTION 

LOAD FUNCTION -> P 

INSURE RECEIVED PACKET COUNTER 
IS CLEAR 


CLEAR INTERRUPT BITS 


a START PORT COMMAND 
YES, SKIP ERROR REPORT 


‘FATL’ BIT SET? 





SEQ 348 


; REPORT ERROR 
TRAP CSERHROD 
-WORD 626 
-WORD ERROI2 
-WORD MSGOOS 

3 AND ABORT TEST 
TRAP CSESCAPE 
WORD 1L10057-. 


CLEAR ONI 
IF DNI CLEARED SKIP ERROR REPORT 


‘FATL’ BIT SET? 
; ELSE REPORT ERROR 


TRAP CSERHRD 


-WORD 627 
: -WORD ERROOG 
-WORD MSGOOS 
; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10057-. 


; 
s;ISSUE GET COMMAND FOR READ COUNTERS FUNCTION 


113%: 


MOVB 


@GETCMD , @PCSRO 


;WAIT FOR ONI BEFORE CONTINUING 


JSR 


PC ,CHKONI 


; ISSVE GET_CMD PORT COMMAND 


; CHECK FOR DNI 











= 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 
11086 076156 103010 BCC 118% ; SKIP ERROR REPORT IF ONI 
11087 076160 FTL 
076160 004737 026652’ JSK PC ,CHKFTL ; ‘FATL’ BIT SET? 
11088 076164 ERRHRD 630. ,ERRO10,MSGOO03 ; REPORT ERROR 
076164 104456 TRAP CSERHRD 
076166 001166 -WORD 630 
076170 023331’ -WORD ERRO1O 
076172 021736’ -WORD MSG003 
11069 076174 ESCAPE TST ; AND ABORT TEST 
076174 104410 TRAP CSESCAPE 
076176 000734 -WORD 1L10057-. 
11090 076200 118%: 
11091 076200 004737 030264’ JSR PC ,.CLRONI ; CLEAR ONI 
11092 076204 103010 BCC 125$ ; CONTINUE IF OK 
11093 076206 FTL 
076206 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
11094 076212 ERRHRD 631. ,ERROO6,MSGOOS ; ELSE REPORT ERROR 
076212 1044 TRAP CSERHRD 
076214 001167 -WORD 631 
076216 023050' -WORD ERROO6 
076220 021736’ -WORD MSGOOS 
11095 076222 ESCAPE TST ; AND ABORT TEST 
076222 104410 TRAP CSESCAPE 
osama 076224 000706 -WORD 1L10057-. 
reed 076226 152777 000100 101770 125%:  BISB @INTE , @PCSRO ; ENABLE INTERRUPTS 
; 
11099 076234 004737 027566' JSR PC ,CHKTXI 3s TXI ? 
11100 076240 103010 BCC 140% ; YES 
11101 076242 FTL 
076242 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
11102 076246 ERRHRD 632. ,ERRO13,MSGOOS ; NO, REPORT ERROR 
076246 104456 TRAP CSERHRD 
076250 001170 -WORD 632 
076252 023550’ -WORD ERRO15 
076254 021736' -WORD MSGOOS 
11103 076256 ESCAPE TST ; AND ABORT TEST 
076256 104410 TRAP CSESCAPE 
— 076260 000652 -WORD L10057-. 
; 
11105 076262 004737 030500’ 140$: JSR PC ,CLRTXI ; WRITE ONE TO CLEAR TXI 
11106 ; ERROR ? 
11107 076266 103010 BCC 150$ ; NO 
11108 076270 FTL 
076270 004737 026652' JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
11109 076274 ERRHRD 633. ,ERRO14,MSGOOS ; YES, REPORT ERROR 
076274 104456 TRAP CSERHRD 
076276 001171 -WORD 633 
076300 023561' .WORD ERROI4 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 





076302 021736’ 
11110 076304 ESCAPE TST ; AND ABORT TEST 
076304 104410 TRAP CSESCAPE 
se 076306 000624 WORD 110057-. 
UTS: ;CHECK 1ST RING ENTRY 
11114 076310 012705 001014’ 150$: MOV @TORX,.RS ; CHECK TORB OWNERSHIP 
11115 076314 004737 027024’ JSR PC , CHKOWN ; OWN = PORT DRIVER 7? 
11116 076320 103010 BCC 160$ ; YES 
11117 076322 FTL 
076322 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11118 076326 ERRHRD 634. ,ERRO27 ; NO, REPORT ERROR 
076326 104456 TRAP CSERHRD 
076330 001172 -WORD 634 
076332 024540’ -WORD ERROZ7 
076334 000000 -WORD 0 
11119 076336 ESCAPE TST ; AND ABORT TEST 
076336 104410 TRAP CSESCAPE 
_— 076340 000572 -WORD 1L10057-. 
i 
11121 076342 012705 016264’ 160$: MOV @TOR14A,R5 ; POINT TO EXPECTED TORB 
11122 076346 004737 032370’ JSR PC ,LOXTOR ; LOAD INTO XTORBO TABLE 
11123 076352 012705 001014’ MOV @TORX,RS ; CHECK TORB 
11124 076356 004737 027500’ JSR PC ,CHKTDOR ; ERRORS ? 
11125 076362 103010 BCC 162% ; NO 
11126 076364 FTL 
076364 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11127 076370 ERRHRD 635. ,ERRO33,MSGOOS ; YES, REPORT ERROR 
076370 104456 TRAP CSERHRD 
076372 001173 -WORD 635 
076374 025166' -WORD ERROSS 
076376 022042' - WORD 
11128 076400 ESCAPE TST ; AND ABORT TEST 
076400 104410 TRAP CSESCAPE 
—— 076402 000530 -WORD 110057-. 
ti ;CHECK LAST RING ENTRY 
11132 076404 012705 001320' 1623: MOV @TORX+196. RS ; CHECK TORB OWNERSHIP 
11133 076410 004737 027024' JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
11134 076414 103010 ecc 164% ; YES 
11135 076416 FTL 
076416 004737 026652’ JSR PC ,CHKFTL ; ‘FATL' BIT SET? 
11136 076422 ERRHRD 636. .ERRO2S ; NO, REPORT ERROR 
076422 104456 TRAP CSERHRD 
076424 001174 -WORD 636 
076426 5‘ -WORD ERRO2S 
076430 -WORD 0 
11137 076432 ESCAPE TST ; AND ABORT TEST 
076432 104410 CSESCAPE 


= 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 


SEQ 351 


e290 076434 000476 «WORD 110057-. 
11139 076436 012705 016264’ 164$: MOV @TDR14A,R5 ; POINT TO EXPECTED TORB 
11140 076442 004737 032370‘ JSR PC ,LOXTDOR ; LOAD INTO XTORBO TABLE 
11141 076446 012705 001314’ MOV @TORX+192. ,R* ; CHECK TORB 
11142 076452 004737 027500’ JSR PC ,CHK7DR ; ERRORS ? 
11143 076456 103010 BCC 190$ ; NO 
11144 076460 FTL 
076460 0C4737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
11145 076464 ERRHRD 637.,ERRO34,MSGO05 ; YES, REPORT ERROR 
076464 104456 TRAP CSERHRD 
076466 001175 -WORD 637 
076470 025255’ -WORD ERROS4 
076472 022042‘ -WORD M™SGOO05 
11146 076474 ESCAPE TST ; AND ABORT TEST 
076474 104410 TRAP CSESCAPE 
an06? 076476 000434 -WORD (10057-. 
te ;CHECK 1ST RING ENTRY 
11150 076500 012705 001624’ 190$: MOV @RDORX,RS ; CHECK RDRB OWNERSHIP 
11151 076504 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
11152 076510 103010 BCC 200$ ; YES 
11153 076512 FTL 
076512 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL’ BIT SET? 
11154 076516 ERRHRD 640. ,ERROSO ; NO, REPORT ERROR 
074516 104456 TRAP CSERHRD 
076520 001200 -WORD 640 a 
076522 024753' -WORD ERROSO 
076524 000000 -WORD 0O 
11155 076526 ESCAPE TST ; AND ABORT TEST 
076526 104410 TRAP CSESCAPE 
_— 076530 000402 -WORD L10057-. 
1 3 
11157 076532 012705 016454' 200$: MOV #RDR2OC RS ; POINT TO EXPECTED RDORB 
11158 076536 004737 032340’ JSR PC ,.LDXRDR ; LOAD INTO XRORBO TABLE 
11159 076542 012705 001624’ MOV @RORX, RS ; CHECK RDRB 
11160 076546 004737 027206' JSR PC ,CHKRDOR ; ERRORS ? 
11161 076552 103010 BCC 202$ ; NO 
11162 076554 FTL 
076554 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’' BIT SET? 
11163 076560 ERRHRD 641.,ERRO36,MSGO006 ; YES, REPORT ERROR 
076560 104456 RAP CSERHRD 
076562 001201 -WORD 641 
076564 025345' -WORD ERROS6 
076566 022204’ -WORD MSG006 
41164 076570 ESCAPE TST ; AND ABORT TEST 
76570 104410 TRAP CSESCAPE 
076572 000340 -WORD L10057-. 
11165 
11166 sCHECK LAST RING ENTRY 











- —_ 0 eS AS 2 A RT 
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TES. 25: SIMULTANEOUS OPERATIONS TEST 
11167 
11168 076574 012705 002130° 202$: MOV ORDRX+196. ,RS ; CHECK RORB OWNERSHIP 
11169 076600 004737 027024’ JSR PC ,CHKOWN ; OWN = PORT DRIVER ? 
11170 076604 103010 BCC 2043 ; YES 
11171 076606 FTL 
076606 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11172 076612 ERRHRD 642.,ERRO31 ; NO, REPORT ERROR 
076612 104456 TRAP CSERHRD 
076614 001202 -WORD 642 
076616 025060’ -WORD ERRO3! 
076620 000000 -WORD 0 
11173 076622 ESCAPE TST ; AND ABORT TEST 
076622 104410 TRAP CSESCAPE 
— 076624 000306 -WORD 110057-. 
11175 076626 012705 016454’ 2043: MOV ®RDR2OC RS ; POINT TO EXPECTED RORB 
11176 076632 004737 932340' JSR PC .LDXRDR ; LOAD INTO XRORBO TABLE 
11177 076656 012705 002124’ MOV @RDRX+"92.,R5 ; CHECK RORB 
11178 076642 004737 027206’ JSR PC ,CHKRDR ; ERRORS ? 
11179 076646 103010 BCC 210$ ; NO 
11180 076650 FTL 
076650 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11181 076654 ERRHRD 643. ,ERRO37,MSGO06 ; YES, REPORT ERROR 
076654 104456 TRAP CSERHRD 
076656 001203 -WORD 643 
076660 025433’ -WORD ERRO3S7 
076662 022204’ -WORD MSGO006 
11182 076664 ESCAPE TST ; AND ABORT TEST 
076664 104410 TRAP CSESCAPE 
076666 000244 ‘ L10057- 
11183 
11184 
pe ;COMPARE RBUF WITH TBUF 
11187 076670 013705 016560’ 210$: MOV BYTCNT RS ; COMPARE DATA 
11188 076674 004737 030712’ JSR PC ,CMPDAT ; DATA COMPARE ERROR ? 
11189 076700 193006 BCC 220% ; NO 
11190 076702 ERRHRD 644. ,ERRO22,MSG007 ; YES, REPORT ERROR 
076702 104456 TRAP CSERHRD 
076704 001204 -WORD 644 
076706 024350’ -WORD ERRO22 
076710 022346' -WORD MSGO007 
11191 076712 ESCAPE TST ; AND ABORT TEST 
076712 104410 TRAP CSESCAPE 
076714 000216 -WORD 1L10057-. 
£1192 , ; 
11193 076716 220%: 
31194 076716 012705 006472’ MOV #RBUF +3285 ; OFFSET TO CRC 
£1195 076722 004737 030642’ JSR PC ,CMPCRC ; ERRORS ? 
11196 076726 103006 BCC 225$ ; NO 
11197 076730 ERRHRD 645. ,ERRO23,MSGO008 ; YES, REPORT ERROR 


076730 104456 
076732 001205 





qaqa ea, 


A 





eS eS LS 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 
076734 024417' -WORD ERRO23 
076736 022400’ -WORD MSGOO08 
11198 076740 ESCAPE TST ; AND ABORT TEST 
C76740 104410 TRAP CSESCAPE 
076742 000170 -WORD L10057-. 
11199 3 
11200 076744 2253: 
11201 076744 005737 000314’ TST UDBB +4 ; HAVE FECEIVED AT LEAST ONE PACKET? 
11202 076750 001010 BNE 230$ ; YES, SKIP ERPROR REPORT 
11203 076752 FTL 
076752 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11204 076756 ERRHRD 646. ,ERRO46,MSG010 ; NO, REPORT ERROR 
076756 104456 TRAP CSERHRD 
076760 001206 -WORD 646 
076762 026337’ -WORD ERRO46 
076764 022604' -WORD SG010 
11205 076766 ESCAPE TST ; AND ABORT TEST 
076766 104410 RAP CSESCAPE 
076770 000142 -WORD 110057-. 
11206 3 
11207 076772 2308: 
11208 076772 012777 004100 MOV @DONI! INTE, APCSRO ; ENABLE INTERRUPTS 
11209 077000 112777 000117 101216 MOVB #INTE!STOP .@PCSRO ; ISSUE STOP PORT COMMAND 
11210 077006 004737 026550’ JSR PC ,CHKDONI ; ONI ? 
11211 077012 103010 BCC 240$ ; YES 
li212 077014 FTL 
077014 004737 026652’ JSR PC .CHKFTL ; ‘FATL’ BIT SET? 
11213 077020 ERRHRD 647.,ERRO19,MSGOOS ; NO, REPORT ERROR 
077020 104456 TRAP CSERHRD 
077022 001207 -WORD 647 
077024 024126‘ -WORD ERROI9 
077026 021736’ -WORD MSGOO3 
11214 077030 ESCAPE TST ; AND ABORT TEST 
077030 104410 TRAP CSESCAPE 
— 077032 000100 -WORD L10057-. 
11216 077034 004737 030264' 240$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DNI 
11217 ; ERROR ? 
11218 077040 103010 BCC 250$ ; NO 
11219 077042 FTL 
077042 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
11220 077046 ERRHRD 650. ,ERROO6,MSGOO03 ; YES, REPORT ERROR 
077046 104456 TRAP CSERHRD 
077050 001212 -WORD 650 
077052 023030' -WORD ERROOG 
077054 021736’ -WORD MSGOO3 
41221 077056 ESCAPE TST ; AND ABORT TEST 
077056 104410 TRAP CSESCAPE 
077060 000052 -WORD L10057-. 
11222 077062 2505: 
11223 077062 004737 030346' JSR PC,CLINTR ; 





TEST 25: SIMULTANEOUS OPERATIONS TEST 


11224 
11225 


11226 
11227 
11228 
11229 


077066 
077066 
077070 


077072 
077075 
077100 
077103 
077106 
O7711i 
077114 
077117 
077122 
077125 
077130 


077132 
077132 
077132 


104432 
000042 


104401 


;LOCAL TEST MESSAGE 
T2510: .ASCIZ ‘DELUA SIMULTANEOUS OPERATIONS ' 


-EVEN 


EXIT 


ENDTST 


el 
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TST 





ete 
SEQ 354 


TRAP CSExIT 
.WGRO L10057- . 


Li0057: 
TRAP CSsETST 





SL 
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TEST 25: SIMULTANEOUS OPERATIONS TEST 


SEQ 355 


11234 
11235 .SBTTL TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK CONN. ) 
ry 4 $ £b6 0464464404646 404644646446 4444444646464 44464444644646 606646464646646664664646646466444646466466644 
11238 3 
11239 ; THIS TEST VERIFIES THAT AN EXTERNAL LOOPBACK OPERATION 
11240 ; CAN BE PERFORMED SUCCESSFULLY. TEST WILL NOT RUN UNLESS 
11241 ; EXTERNAL LOOPBACK BIT IN P-TABLE HAS PREVIOUSLY BECN SET. 
11282 ; THIS TEST WILL ALSO BE SKIPPED IF IN UNATTENDED MODE. 
; 
11244 ; NOTE: IF AN EXTERNAL LOOPBACK IS NOT INSTALLED FOLLOWING 
11245 : OPERATOR PROMPT, THE TEST WILL FAIL. 
11247 : TEST SEQUENCE: 
11248 ; 1. WRITE MODE REGISTER = EXTERNAL LOOPBACK, PROM MODE 
11249 ; 2. WRITE RING FORMAT 
11250 ; 3, WRITE PHYSICAL ADDRESS 
11251 ; 4. SET UP RINGS AND BUFFERS 
11252 ; 5S. ISSUE START 
11253 ; 6. CHECK FOR ERRORS 
11254 ; 7. ISSUE STOP 
11255 ; 
11256  RRARKARAREKAERAESEEEEREAEESAESESLESEARAEEASERESELESSEEBEEEEESEEESEEEEEEESEEEDES 
11257 
11258 077134 BGNTST 
077134 T26:: 
11259 
11260 ;IS EXTERNAL LOOPBACK OPERATION DESIRED? 
11262 077134 005737 000222’ TST EXLOOP ; SELECTED? 
11263 077140 001006 BNE i$ ;YES, CONTINUE WITH TEST 
11264 077142 PNTMAC SKIP ;PRINT TEST ID AND REASON FOR SKIP 
077142 012704 020775’ MOV @SKIP,R4 ;GET POINTER TO TEST NAME MESSAGE 
077146 004737 032734' JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
11265 077152 EXIT TST ; AND GET OUT OF TEST 
077152 104432 TRAP  C$EXIT 
re 077154 001622 .WORD  110060-. 
11267 ;IF UNATTENDED MODE WILL NOT RUN THIS TEST 
11269 077156 i$: , 
11270 077156 MANUAL 
077156 104450 TRAP = C$MANI 
11271 077160 BCOMPLETE S$ ;IF NOT UAM, CONTINUE TEST 
077160 103406 BCS S$ 
11272 077162 PNTMAC SKIP26 ;PRINT TEST ID AND REASON FOK SKIP 
077162 012704 021056’ MOV #SKIP26,R4 :GET POINTER TO TEST NAME MESSAGE 
077166 004737 032734’ JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
11273 077172 EXIT TST ; AND GET OUT OF TEST 
a 


| 
= 





ne RR ee ne el 
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077172 
077174 
11274 077176 
11275 077176 


077176 
977202 


11276 
11277 
11278 
11279 
112860 


11281 


11297 


11298 


104432 
001602 


012704 
004737 


103357 
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EQUIRES INSTALLED LOOPBACK C 
TRAP CSEXIT 
S$ . WORD L10060 - . 
PNTMAC T26ID 
100744' MOV #T26ID,R4 ;GET POINTER TO TEST NAME MESSAGE 
032734’ JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC’ 
sNOTIFY OPERATOR TO INSTALL LOOPBACK UNIT, AND WAIT FOR HIS RESPONSE 
10$: 
PRINTF #MSGi ;OPERATOR MESSAGE 
020570' MOV oMSG1, -CSP) 
060001 MOV #1,-(CSP) 
MOV SP ,RO 
TRAP CSPNTF 
000004 ADD 04 ,SP 
GMANID MNMSG1,REPLY,A.15,.0,.2, YES 
TRAP C$GMAN 
BR 10000$ 
-WORD REPLY 
-WORD TSCODE 
-WORD MNMSGi 
-WORD 15 
-WORD TSLOLIM 
-WORD ###TSHILIM 
10000$: 
;MESSAGE ADDRESS DATA, LOCATION 
;(WORD FOR RESPONSE). A FOR ASCII, 
;STORE RESPONSE VALUE IN BITS 0,1 
;0F REPLY, 0-2 (LIMITS), DEFAULT 
; ACCEPTED. 
BNCOMPLETE 10$ ;WAIT FOR CORRECT RESPONSE 
BCC 10$ 
033434' JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
BCC 30$ ; NO 
004100 100740 MOV #DNI INTE @PCSRO ; PRECONDITION INTR EN. 
000140 100732 MOVB #INTE! RSET ,@PCSRO ; YES, RESET DELUA 
027736' JSR PC ,CKONI ; DNI ? , 
BCC 20$ ; YES 
FTL 
026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
ERRHRD 651. ,ERROO6,MSGOOS ; NO, REPORT ERROR 
RAP CSERHRD 
-WORD 651 
-WORD ERROOSG 
.WORD MSGOO3 
ESCAPE TST ; AND ABORT TEST 
TRAP CSESCAPE 
-WORD 1L10060-. 





= - 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 


11299 077320 
11300 


11301 
11302 


11303 


11327 


077410 
077410 
077412 
077414 
077416 
077420 
077420 
077422 


077424 


077452 


004737 030264’ 


103010 


004737 


104456 
001215 
023245 ' 
021736' 


104410 
001354 


004737 
103010 


004737 


012705 
004737 


026652’ 


030212' 


026652 ' 


030264 ' 


026652 ' 


012630' 
032002 ' 


203: 


40$: 


JSR 


BCC 
FTL 


JSR 
ERRHRD 


ESCAPE 


ESCAPE 


PC ,.CLRONI 
30$ 


PC ,CHKFTL 
652. ,ERROO6, MSGO03 


TST 


PC ,.CLRBUF 

PC ,LDDFLT 

PC ,LDPCSR 

#ONI ! INTE, @PCSRO 
#INTE!GETPCB ,SPCSRO 
PC , CHKONI 

40$ 

PC ,CHKFTL 


653. ,ERROO9, MSGO03 


TST 


PC ,.CLRONI 
50$ 


PC ,CHKFTL 
654. ,ERROOG, MSGO03 


TST 





WRITE ONE TO CLEAR ONI 
_ ? 


‘FATL’' BIT SET? 

YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
. WORD 


CLEAR XMIT,RECV BUFFERS 





SEQ 357 


LOAD DEFAULT PHY.ADDRESS TABLES 


ADDRESS OF PCBB -> PCSR2!3 
PRECONDITION INTR EN. 
ISSUE GET_PCBB PORT COMMAND 


YES 

‘FATL’' BIT SET? 

NO, REPORT ERROR 
TRAP 
- WORD 
- WORD 
- WORD 

AND ABORT TEST 
TRAP 
- WORD 


WRITE ONE TO CLEAR DNI 
_— ? 


‘FATL' BIT SET? 

YES, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


;WRITE MODE REGISTER = EXTERNAL LOOPBACK AND PROM MODE 


50$: 


MOV 
JSR 


#WTMOD3S,RS 
PC ,LDPCBB 


DEFAULT WRITE MODE FUNCTION 
LOAD FUNCTION -> PCBB 


CSESCAPE 
L10060-. 





HARDWARE TESTS 





MACRO YOS.02 Fri 
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11329 077462 
11330 077470 
11331 077476 
11332 077502 
11333 077504 


11334 


11355 


11356 


11357 


11358 


| 
= 


077504 


077620 
077624 


077632 
077634 
077634 
077636 


004100 
000102 
026550’ 


026652’ 


030264 ' 


026652’ 


012540' 
032002' 
012704' 
000006 


000102 
026550' 


026652' 





100534 
100526 


100420 
100412 


12-Jul-85 09:33 P 


117-3 


RES INSTALLED LOOPBACK C 


MOV #ONI! INTE, @PCSRO 
MOVB @INTE!GETCMD,,@PCSRO 
JSR PC ,CHKDNI 

BCC 60$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 655. ,ERRO10,MSGO03S 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 70$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 656. ,ERROO6,MSGO03 


ESCAPE TST 


;WRITE RING FORMAT 


70$: 


MOV @WUTRNGS,RS 

JSR PC ,LDPCBB 

MOV @RFRMT RS 

MOV #6 ,RO 

JSR PC ,LDUDBB 

MOV #ONIS INTE, @PCSRO 
MOVB #INTE!GETCMD ,@PCSRO 
JSR PC ,CHKDNI 

BCC 80$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 657. ,ERRO10,MSGOO0S 


ESCAPE TST 





PRECONDITION INTR EN. 
es GET_CMD PORT COMMAND 


YES 


‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
-WORD 
- WORD 
- WORD 
AND ABORT TEST 
TRAP 
WORD 


WRITE ONE TO CLEAR ONI 
— ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
TRAP 
- WORD 
-WORD 
-WORD 

AND ABORT TEST 
TRAP 
- WORD 





—*» 


SEQ 358 


CSESCAPE 
t.10060-. 


DEFAULT WRITE —_ FUNCTION 


LOAD FUNCTION -> P 

DEFAULT RING FORMAT 

FORMAT = SIX WORDS 

LOAD RING FORMAT -> UDBB 
PRECONDITION Ii)TR EN. 
as GET_CMD PORT COMMAND 


YES 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


CSESCAPE 
L10060-. 











A ES 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 

11359 077640 004737 030264’ 80$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 

11360 ; ERROR ? 

11361 077644 103010 BCC 90$ ; NO 

11362 077646 FTL 
077646 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

11363 077652 ERRHRD 658. ,ERROO6,MSGO03 ; YES, REPORT ERROR 
077652 104456 TRAP C#YERHRD 
077654 001222 -WORD 658 
077656 023030’ -WORD ERROOE 
077660 021736‘ -WGRD MSSGO003 

11364 077662 ESCAPE TST ; AND ABORT TEST 
077662 104410 TRAP CSESCAPE 
077664 001112 -WORD Li -. 

11365 ; 

11366 ;WRITE PHYSICAL ADDRESS 

11367 

11368 077666 90$: 

11369 077666 012705 000272' MOV #DFAULT,RS ; GET DEFAULT PHYSICAL ADDRESS 

11370 077672 004737 032050’ JSR PC ,.LDPHYA ; PLACE IT IN DATA TABLE 

11371 077676 012705 012500’ MOV @WTPHYA,RS ; DEFAULT WRITE PHYSICAL ADDR FUNC 

11372 077702 004737 932002‘ JSR PC ,LDPCBB ; LOAD FUNCTION -> PCBB 

11373 077706 0612777 004100 100310 MOV #DNI ! INTE, BPCSRO ; PRECONDITION INTR EN. 

11374 077714 112777 000102 100302 MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 

11375 077722 004737 026550’ JSR PC ,CHKDNI ; ONI ? 

11376 077726 103010 BCC 100$ ; YES 

11377 077730 FTL 
077730 004737 0926652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

11378 077734 ERRHRD 660. ,ERRO10,MSGO0S ; NO, REPORT ERROR 
077734 104456 TRAP CSERHRD 
077736 001224 -WORD 660 
077740 023331’ -WORD ERROIO 
077742 021736' .WORD MSGOO3 

11379 077744 ESCAPE TST ; AND ABORT TEST 
077744 104410 TRAP CSESCAPE 

— 077746 001030 -WORD 1L10060-. 

11381 077750 004737 030264’ 100$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR DONI 

11382 ; ERROR ? 

11383 077754 103010 BCC 110$ ; NO 

11384 077756 FTL 
077756 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 

11385 077762 ERRHRD 661. ,.ERROO6,MSGOO0S ; YES, REPORT ERROR 
077762 104456 TRAP CSERHRD 
077764 001225 . WORD 1 
077766 023030' -WORD ERROOG 
077770 021736' .WORD MSGOO3 

£1386 077772 ESCAPE TST ; AND ABORT TEST 
077772 104410 TRAP CSESCAPE 
077774 001002 -WORD L10060-. 

11387 ; 

11388 sSET UP RINGS FOR ONE BUFFER LOOPBACK 











-- 
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TEST 26: EXTERNAL LOOPBACK TEST CRE 


RES INSTALLED LOOPBACK C 


11390 077776 012705 014410' 110$: MOV #TORB1A,RS ; DEFAULT ONE BUFFER TRANSMIT RING 

11391 100002 004737 032164’ JSR PC ,LOTORB ; LOAD TORB 

11392 100006 012705 012750‘ MOV #RDORB1A,RS ; DEFAULT ONE BUFFER RECEIVE RING 

po 100012 004737 032070’ JSR PC ,LDRORB ; LOAD RORB 

; 

ero ;SET UP BUFFERS AND START 

11327 100016 005037 016562’ CLR DOCRC ; NG APPEND CRC 

11398 100022 012737 000006 016560’ MOV #6 ,BYTCNT ; DATA BYTE COUNT 

pres 100030 004737 033006’ JSR PC ,SETBUF ; SET UP BUFFERS 

tan sINSURE SOURCE AND DESTINATION ADDRESSES = DEFAULT PHYSICAL ADDRESS 

11403 100034 012737 000004 000300' MOV #4,PCBB ; READ DEFAULT PHYSICAL ADDRESS 

11404 100042 012777 004100 100154 MOV #DNI! INTE, @PCSRO ; PRECONDITION INTR ENABLE 

11405 100050 112777 000102 100146 MOVB #INTE!GETCMD ,@PCSRO ; ISSUE GET_CMD PORT COMMAND 

1406 100056 004737 026550’ JSR PC ,CHKDNI ; ONI? 

11467 100062 103010 BCC 112$ ; YES 

11408 100064 FTL 
100064 004737 026652‘ JSR PC ,CHKFTL ; 'FATL’ BIT SET? 

11409 100070 ERRHRD 662. ,ERRO12,MSGO03 
100070 104456 TRAP CSERHRD 
100072 1226 -WORD 662 
100074 023447' -WORD ERROI2 
100076 021736' -WORD MSGOOS 

11410 100100 ESCAPE TST 
100190 104410 TRAP CSESCAPE 
100102 000674 -WORD L10060-. 

11411 100104 112$: 

11412 100104 004737 030264’ JSR PC ,CLRONI ; CLEAR ONT 

11413 100110 103010 BCC 114$ 

11414 100112 004737 026652’ JSR PC ,CHKFTL ; CHECK FOR FATL BIT SET 

11415 100116 ERRHRD 663. ,ERROO6, MSGO0S 
100116 104456 TRAP CSERHRD 
100120 001227 - WORD 3 
100122 023050' - WORD 
100124 021736' -WORD MSGOOS 

11416 100126 ESCAPE TST ; EXIT TEST 
100126 104410 TRAP CSESCAPE 
100130 000646 WORD L10060-. 

ed 100132 1148: 

te ;LOAD DEFAULT PHYSICAL ADDRESS INTO SOURCE AND DESTINATION ADDRESS 

11421 100132 012700 000902 MOV #2 ,R9O ; INIT COUNTER 

11422 100136 012701 0024356’ MOV #TBUF ,R1 ; BASE ADDRESS OF XMIT BUFFER 

11423 100142 116$: 

11424 100142 013721 000302’ MOV PCBB+2,(R1)+ ; READ OUT 

11425 100146 013721 000504’ MOV PCBB+4,(R1)+ ; PHYSICAL 

41426 100152 013721 0003506’ MOV PCBB+6,(R1)+ : ADDRESS 

re 100156 077007 SOB RO,116$ ; DO TWICE 

11429 ;SEND PACKET 

11430 
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TEST 26: 





EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 
100160 012777 004100 100036 MOV @ONI! INTE, @PCSRO 
100166 112777 000104 100030 MOVB = SINTE! START, @PCSRO 
100174 004737 026550’ JSR PC ,CHKDNI 
100200 103010 BCC 1208 
100202 FTL 
100202 004737 026652' JSR PC ,CHKFTL 
100206 ERRHRD 664. ,ERRO12,MSG003 
100206 104456 
100210 001230 
100212 023447' 
100214 021736’ 
100216 ESCAPE TST 
100216 104410 
100220 000556 
100222 004737 030264' i20$: JSR PC ,CLRONI 
100226 103010 BCC 130$ 
100230 FTL 
100230 004737 026652° JSR PC ,CHKFTL 
100234 ERRHRD 665. ,.ERROO6,MSGOO3 
00234 104456 

001231 
100240 023030° 
100242 021736’ 
100244 ESCAPE TST 
100244 104410 
100246 000530 

5 

100250 004737 027566’ 130$: JSR PC ,CHKTXI 
100254 103010 Bcc 140$ 
100256 FTL 
100256 004737 026652’ JSR PC ,CHKFTL 
100262 ERRHRD 666. ,ERRO13,MSGOO3 
100262 
100264 001232 
100266 023530' 
100270 021736’ 
100272 ESCAPE TST 
100272 104410 
100274 000502 
100276 004737 030500' 140$: JSR PC ,CLRTXI 
100302 103010 BCC 150$ 
100304 FTL 
100304 004737 026652: JSR PC ,CHKFTL 
100310 ERRHRD 667. ,ERRO14,MSGOO3 
100310 104456 
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PRECONDITION INTR EN. 
oe START PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 


AND ABORT TEST 


WRITE ONE TO CLEAR ONI 
a t 


‘FATL’ BIT SET? 
YES, REPORT ERROR 


TRAP 
- WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
-WORD 
TXI ? 
YES 
‘FATL' BIT SET? 
NO, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR TXI 
a1? ? 


‘FATL’ BIT SET? 


YES, REPORT ERROR 
TRAP 





SEQ 361 


CSERHRD 
664 


ERRO12 
MSGOO03 


CSESCAPE 
L10060-. 


CSERHRD 
666 

ERRO13 
MSGOO3 


CSESCAPE 
L10050-. 


CSERHRD 








eae 
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TEST 26: EXTERNAL LOOPBACK TEST CREQUIRES INSTALLED LO CK C 





100312 001233 WORD 667 
100314 023561’ ‘WORD — ERRO14 
100316 021736’ ‘WORD © MSGOO3 
11457 100320 ESCAPE TST ; AND ABORT TEST 
100320 104410 TRAP —- CSESCAPE 
sas 100322 000454 WORD 10060-. 
2 
11459 100324 012705 000620° 150$: MOV § @TORB,RS ; CHECK TORB OWNERSHIP 
11460 100330 004737 027024° JSR —- PC, CHKOWN ; OWN = PORT DRIVER ? 
11461 100334 103010 BCC 8 —_—«-1608 ; YES 
11462 100336 FTL 
100336 004737 026652’ JSR PC, CHKFTL ; ‘FATL’ BIT SET? 
11463 100342 ERRHRD 668. ,ERRO18 ; NO, REPORT ERROR 
100342 104456 TRAP  CSERHRD 
100344 001234 WORD 668 
100346 024026’ “WORD ERRO18 
100350 000000 WORD 0 
11464 100352 ESCAPE TST ; AND ABORT TEST 
100352 104410 TRAP — CSESCAPE 
sags 10034 00de2 WORD 10060-. 
; 
11466 100356 012705 016264’ 160$: MOV §§ @TDRI4A,R5 ; POINT TO EXPECTED TORB 
11467 100362 004737 032370’ JSR —«- PC, LDXTOR ; LOAD INTO XTDRBO TABLE 
11468 100366 012705 000620’ MOV =: @TDRB, RS ; CHECK TORB 
11469 100372 004737 027500’ JSR PC, CHKTOR ; ERRORS ? 
11470 100376 103010 BCC 8 0—_—«1708 ; 
11471 100400 “TL 
100400 004737 026652’ ySR PC, CHKFTL ; ‘FATL’ BIT SET? 
11472 100404 ERRHRD 670. ,ERRO20,MSGOOS ; YES, REPORT ERROR 
100404 104456 TRAP  CSERHRD 
100406 001236 WORD 670 
100410 024206' WORD  ERRO2O 
100412 022042: “WORD MSGOCS 
11473 100414 ESCAPE TST ; AND ABORT TEST 
100414 104410 TRAP  CSESCAPE 
ssa7g L0onte 000860 .WORD L10060-. 
3 
11475 100420 004737 027316’ 170s: JSR PC, CHKRXI ; RXI ? 
11476 100424 103010 Bcc 0O—s«é18088 ; YES 
11477 100426 FTL 
100426 004737 026652’ JSR PC, CHKFTL ; ‘FATL' BIT SET? 
11478 100432 ERRHRD 671. ,ERRO15S,MSGOO3 ; NO, REPORT ERROR 
100432 104456 TRAP CSERHRD 
100434 001237 671 
100436 023627' WORD  ERRO1S 
100440 021736’ MSGOO3 
11479 100442 ESCAPE TST ; AND ABORT TEST 
100442 104410 TRAP —- CSESCAPE 
sian LOM 000882 WORD L10060-. 
é 
11481 100446 004737 030432’ 180$: JSR = PC, CLRRXI ; WRITE ONE TO CLEAR RXI 








ne ee NT 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 
11482 
11483 100452 103010 Bcc 190$ 
11484 100454 . FTL 
100454 004737 026652’ JSR PC ,CHKFTL 
11485 100460 ERRHRD 672. ,ERRO16,MSGO03 
100460 104456 
100462 001240 
100464 023660’ 
100466 021736’ 
11486 100470 ESCAPE TST 
100470 104410 
100472 000 
11487 3 
11488 100474 012705 000660‘ 190%: MOV @RORB, RS 
11489 100500 004737 027024' JSR PC , CHKOWN 
11490 100504 103010 BCC 200$ 
11491 100506 FTL 
100506 004737 026652’ JSR PC ,CHKFTL 
11492 100512 ERRHRD 673. ,ERRO17 
100512 104456 
100514 001241 
100516 023726’ 
100520 
11493 100522 ESCAPE TST 
100522 104410 
100524 000252 
11494 ; 
11495 100526 012705 016454' 200%: MOV DR2OC RS 
11496 100532 004737 032340' JSR PC ,.LOXROR 
11497 100536 012705 000660’ MOV @RORB RS 
11498 100542 004737 027206' JSR PC .CHKRDR 
11499 100546 103010 BCC 210% 
11500 100550 FTL 
100550 004737 026652’ JSR PC ,CHKFTL 
11501 100554 ERRHRD 674. ,ERRO21,MSGO06 
100554 104456 
100556 001242 
100560 024267' 
100562 022204' 
11502 100564 ESCAPE TST 
100564 104410 
100566 000210 
11503 ; 
To ;COMPARE RBUF WITH TBUF 
31506 100570 013705 016560' 210$: MOV BYTCNT RS 
211507 100574 004737 030712’ JSR »CMPDAT 
11508 100600 103006 Bcc 220% 
11509 100602 ERRHRD 675. ,.ERRO22,.MSGO07 
100602 104456 
100604 0012435 








SEQ 363 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 672 ’ 
.WORD ERROIG 
.WORD SG003 
AND ABORT TEST 
TRAP  CSESCAPE 
~WORD L10060-. 
CHECK RORB OWNERSHIP 
OWN = PORT ORIVER ? 
YES 
‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP  CSERHROD 
.WORD 673 
AND ABORT TEST ; 
TRAP  CSESCAPE 
.WORD 110060-. 
POINT TO EXPECTED RORB 
LOAD INTO XRDRBO TABLE 
CHECK RORB 
ERRORS ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP § CSERHRD 
.WORD 674 
.WORD ERRO21 
.WORD MSGO06 
AND ABORT TEST 
TRAP  CSESCAPE 
.WORD  110060-. 


NUMBER OF DATA COMPARES 
DATA COMPARE ERROR ? 


NO 
YES, REPORT ERROR 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED L ACK C 
100606 024350’ -WORD ERROZ2 
100610 022346’ -WORD SG007 
11510 190612 ESCAPE TST ; AND ABORT TEST 
100612 104410 TRAP CSESCAPE 
100614 000162 .WORD L10060-. 
11511 3 
11512 100616 2203: 
11513 100616 012705 006472’ ‘OV ORBUF +32,R5 ; BASE ADDRESS 
11514 ; OFFSET TO CRC 
11515 100622 004737 030642‘ JSR PC .CMPCRC ; ERRORS ? 
11516 190626 103006 BCC 230$ ; NO 
11517 100630 ERRHRD 676. ,ERRO23,MSGO008 ; YES, REPORT ERROR 
100630 104456 RAP CSERHRD 
100632 001244 -WORD 676 
100634 024417' -WORD ERRO23 
100636 022400’ -WORD MSGO008 
11518 100640 ESCAPE TST ; AND ABORT TEST 
100640 104410 TRAP CSESCAPE 
omen 100642 000134 -WORD Li -. 
11520 100644 012777 004100 077352 230$: MOV @ONI! INTE, @PCSRO ; PRECONDITION INTR EN. 
11521 100652 112777 000117 077344 ! MOVB #INTE!STOP,aPCSRO ; ISSUE STOP PORT COMMAND 
11522 100660 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
11523 100664 103010 BCC 240$ ; YES 
11524 100666 FTL 
100666 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
11525 100672 ERRHRD 677. ,ERRO19,MSGO03 ; NO, REPORT ERROR 
100672 104456 TRAP CSERHRD 
100674 001245 -WORD 677 
100676 024126' -WORD ERROI9 
100700 021736' -WORD MSGOO3 
11526 100702 ESCAPE TST ; AND ABORT TEST 
100702 104410 TRAP CSESCAPE 
_— 100704 000072 -WORD L10060-. 
11528 100706 004737 030264’ 2408: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
11529 ; ERROR ? 
11530 100712 103010 BCC 250$ ; NO 
11531 100714 FTL 
100714 004737 026652’ JSR PC ,.CHKFTL ; ‘FATL‘ BIT SET? 
11532 100720 ERRHRD 680. ,ERROO6,MSGOO03 ; YES, REPORT ERROR 
109720 104456 TRAP CSERHRD 
100722 001250 -WORD 680 
100724 023030’ -WORD ERROOG 
100726 021736’ .WORD MSGO03 
£1533 1090730 ESCAPE TST ; AND ABORT TEST 
100730 104410 TRAP CSESCAPE 
100732 000044 -WORD L10060-. 
21534 100734 250$: 
oo 100734 004737 030346’ JSR PC .CLINTR ; INSURE DELUA INTR BITS CLEAR 
11537 100740 EXIT TST 
100740 104432 TRAP CSEXIT 








100747 125 101 040 
100752 105 130 124 
100755 105 122 116 
100760 101 114 040 
100763 114 117 117 
100766 120 102 101 
100771 103 113 040 
100774 000 
11542 EVEN 


11544 100776 ENDTST 
L10060: 


100776 
TRAP CSsETST 


= —— ee 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 

100742 000034 .WORD 1L10060-. 
11538 

11539 ;LOCAL TEST MESSAGE 

11541 100744 104 105 114 126ID:.ASCIZ ‘DELUA EXTERNAL LOOPBACK 

100776 104401 











- ee ee oe 
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TEST 26: EXTERNAL LOOPBACK TEST (REQUIRES INSTALLED LOOPBACK C 
11546 
ocahe .SBTTL TEST 27: PRINT DEVICE PARAMETERS TEST 
so. sR RRAESSSEEEESRERASASAAEAALERERESEALERAEARALEEEASAESAAESEEEEEEEEEAEEEEEEEEE 
11550 
11551 3 THIS TEST PRINTS THE DEFAULT PHYSICAL ADDRESS, THE MICROCODE 
tans 3 REVISION AND THE SWITCH PACK SETTINGS. 
; 
11554 : TEST SEQUENCE: 
11555 : 1. READ DEFAULT PHYSICAL ADDRESS 
11556 ; 2. READ MICROCODE REVISION 
11557 ; 3. READ SWITCH PACK SETTINGS 
11558 : 4. PRINT 
11559 ; 
aes pRRRAAAAEAEASAEERAARERAREERAEARABEEEEAEEEEREEESEAEEAEEAAEEEEES EEA EEBEE EES 
11561 
11562 101000 BGNTST 
101 T27 
11563 101000 005737 016612‘ TST FRSTIM ; RUN THIS TEST ? 
11564 101004 001006 BNE 5$ ; YES 
11565 101006 PNTMAC T27SKP 
101006 012704 102116’ MOV #T27SKP ,R4 ;GET POINTER TO TEST NAME MESSAGE 
101012 004737 032734’ JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
: END OF MACRO EXPANSION OF ‘PNTMAC’ 
11566 101016 EXIT TST ; NO, EXIT 
101016 104432 TRAP CSEXIT 
101020 001142 -WORD Li10061-. 
11567 3 
11568 101022 5$: 
11569 101022 PNTMAC T27ID 
101022 012704 102060’ MOV #T27ID ,R4 ;GET POINTER TO TEST NAME MESSAGE 
101026 004737 032734' JSR PC ,PNTID ;PRINT TEST NUMBER AND NAME 
; END OF MACRO EXPANSION OF ‘PNTMAC’ 
11570 101032 004737 033434' JSR PC, TINIT ; IS A DEVICE RESET NEEDED? 
11571 101036 103034 BCC 30$ ; NO 
11572 101040 012777 004100 077156 MOV #0NI INTE, @PCSRO ; ENABLE INTERRUPTS 
11573 101046 112777 000140 077150 MOVB #INTE! RSET ,.@PCSRO ; YES, RESET DELUA 
11574 101054 004737 027736' JSR PC ,CKDONI ; DNI ? 
11575 101060 103010 BCC 20$ ; YES 
11576 101062 FTL 
101062 004737 026652’ JSR PC ,CHKFTL ; ‘FATL‘ BIT SET? 
11577 101066 ERRHRD 681. ,ERROO6,MSGOO3S ; NO, REPORT ERROR 
101066 104456 TRAP CSERHRD 
101070 001251 -WORD 681 
101072 023030’ -WORD ERROOG 
101074 021736’ .WORD MSGOO3 
11578 101076 ESCAPE TST ; AND ABORT TEST 
101076 104410 TRAP CSESCAPE 
101100 001062 -WORD L10061-. 
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PRINT DEVICE PARAMETERS TEST 


TEST 27: 


191102 


101106 
101110 


101110 
101114 


101114 
101116 


101162 


101174 
101176 


101202 
101204 


101204 


101210 
101210 


101222 


101224 
101230 
101234 


004737 
103010 


004737 


023030’ 
021736’ 


104410 
001034 


004737 
012777 
112777 
004737 
103010 


004737 


104456 
001253 
023245 ' 
021736' 


104410 
000766 


004737 
103010 


004737 


030264’ 


026652‘ 


032032’ 


026652' 


030264 ' 


026652' 


012460' 
032002 ' 


004100 076762 
000102 076754 


; 
20$: 


403: 


JSR PC ,CLRONI 

BCC 30$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 682. ,ERROO6,MSGO03 
ESCAPE TST 

JSR PC,LDOPCSR 

MOV #DNI! INTE, @PCSRO 
MOVB #INTE!GETPCB,@PCSRO 
JSR PC ,CHKDNI 

Bcc 40$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 683. ,ERROO9,MSGOOS 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 50$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 684. ,ERROO6,MSGOOS 


ESCAPE TST 


3 
;READ DEFAULT PHYSICAL ADDRESS 


50$: 


MOV #RDDEFA,RS 

JSR PC ,LOPCBB 

MOV #DNI! INTE, @PCSRO 
MOVB #INTE!GETCMD ,@PCSRO 


en ee SS LL 


WRITE ONE TO CLEAR ONI 
_ ? 


‘FATL’ BIT SET? 

YES, REPORT ERROR 
RAP 
. WORD 
. WORD 
. WORD 

AND ABORT TEST 
TRAP 
. WORD 


ADDRESS OF PCBB -> PCSR2!3 
ENABLE INTERRUPTS 
ae GET_PCBB PORT COMMAND 


YES 


‘FATL’ BIT SET? 
NO, REPORT ERROR 
TRAP 
- WORD 
. WORD 
- WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR DNI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
RAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


READ DEFAULT PHYA FUNCTION 
LOAD FUNCTION -> PCBB 
ENABLE INTERRUPTS 

ISSUE GET_CMD PORT COMMAND 





SEQ 367 


ERROOG6 
MSG003 
CSESCAPE 
L10061-. 


CSESCAPE 
L1i0061-. 


CSERHRD 
684 


ERROO6 
MSGO03 


CSESCAPE 
L10061-. 














- - 
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EE 


TEST 27: PRINT DEVICE PARAMETERS T 
11609 101250 004737 026550’ JSR PC ,CHKDNI ; ONI ? 
11610 101254 103010 BCC 60% ; YES 
11611 101256 FTL 
101256 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11612 101262 ERRHRD 685. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
101262 104456 TRAP CSERHRD 
101264 001255 -WORD 685 
101266 023331’ -WORD ERROLO 
101270 021736’ -WORD MSGO03 
11613 101272 ESCAPE TST ; AND ABORT TEST 
101272 104410 TRAP CSESCAPE 
opens 101274 000666 -WORD L10061-. 
; 
11615 101276 004737 030264' 60$: JSR PC ,CLRONI ; WRITE ONE TO CLEAR ONI 
11616 ; ERROR ? 
11617 101302 103010 BCC 70$ ; NO 
11618 101304 FTL 
101304 004737 026652’ JSR PC ,CHKFTL ; ‘FATL’ BIT SET? 
11619 101310 ERRHRD 686. ,ERROO6,MSGO0S ; YES, REPORT ERROR 
101310 104456 TRAP CSERHRD 
1€1312 001256 . WORD 
101314 023030 -WORD ERROOG6 
101316 021736' -WORD MSGOO3 
11620 101320 ESCAPE TST ; AND ABORT TEST 
101320 104410 TRAP CSESCAPE 
onens 101322 000640 -WORD L10061-. 
rr sMOVE DEFAULT PHYSICAL ADDRESS FROM PCBB -> DPA 
11624 101324 013737 000302' 102164' 70S: MOV PCBB+2,DPA 
11625 101332 013737 000304' 102166’ MOV PCBB +4 ,DPA+2 
i aes 101340 013737 000306‘ 102170' MOV PCBB +6 ,DPA+4 
rr ;LOAD ASCII MESSAGE (DEF ADR) 
rr “Y 101346 004737 031236‘ JSR PC ,HEXOP ; CONVERT 70 ASCII HEX 
rt ;READ MICROCODE REVISION 
11634 101352 012705 012644' 100$: MOV @RDSTA.RS ; READ PORT STATUS FUNCTION 
11635 101356 004737 032002’ JSR PC ,.LOPC6B ; LOAD FUNCTION -> PCBB 
11636 191362 012777 004100 076634 MOV #ONI INTE, BPCSRO ; ENABLE INTERRUPTS 
11637 101370 112777 000102 076626 MOVB #INTE!GETCMD,@PCSRO ; ISSUE GET_CMD PORT COMMAND 
11638 101376 004737 026550’ JSR PC ,CHKDNI ; DNI ? 
11639 101402 103010 BCC 110$ ; YES 
£1640 101404 FTL 
101404 004737 026652’ JSR PC, CHKFTL s; ‘FATL' BIT SET? 
11641 101410 ERRHRD 687. ,ERRO10,MSGO03 ; NO, REPORT ERROR 
101410 104456 TRAP CSERHRD 
101412 001257 -WORD 687 
101414 023331’ .WORD ERRO1O 





Ee er es 


HAROWARE TESTS 


TEST 27: 


11642 


11648 


PRINT 
101416 
101420 
101420 
101422 
101424 


101430 
101432 


101432 


101574 
101576 


101602 
101604 
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021736‘ 
104410 
000540 


004737 
103010 


004737 


021736’ 


104410 
000512 


013737 
042737 


012705 
004737 
012705 
012700 
004737 
012737 
012737 
012737 
012777 
112777 
004737 
103010 


004737 


104456 
001263 
023331’ 
021736‘ 


104410 
000366 


004737 030264’ 


103010 


030264’ 


026652’ 


000302’ 
177700 


012664 ' 


026652’ 


DEVICE PARAMETERS TEST 


102172' 
102172' 


000312’ 
000316‘ 
000320' 
076462 
076454 


1108: 


ESCAPE TST 

JSR PC ,CLRONI 
BCC 120$ 

FTL 

JSR PC ,CHKFTL 


ERRHRD 690. ,ERROO6,MSGO03 


ESCAPE TST 


. WORD 
AND ABORT TEST 
TRAP 
. WORD 
WRITE ONE TO CLEAR ONI 
ERROR ? 
NO 
‘FATL’ BIT SET? 
YES, REPORT ERROR 
TRAP 
. WORD 
- WORD 
. WORD 
AND ABORT TEST 
TRAP 
. WORD 


“MOVE MICROCODE REVISION FROM PCBB -> RREV 


120$: 


‘ 
;READ SWITCH PACK 


130$: 


1403: 


MOV PCBB+2,RREV 

BIC #177700, RREV 

MOV #OMPMEM, RS 

JSR PC ,LOPCBB 

MOV #UDB28A,RS 

MOV #5,RO 

JSR PC.L 

MOV #SWPACK , UDBB +2 
MOV #2 ,UDBB+6 

MOV #30, UDBB +10 

MOV #ONI! INTE, @PCSRO 
MOVB #INTE!GETCMD ,@PCSRO 
JSR PC ,CHKONI 

BCC 140$ 

FTL 

JSR PC ,CHKFTL 

ERRHRD 691. ,ERRO10,MSGOOS 
ESCAPE TST 

JSR PC ,CLRONI 

BCC 150$ 

FTL 


MASK RREV 


DEFAULT DUMP INTERNAL MEMORY 


LOAD FUNCTION -> PCBB 


ADDRESS (6000002 OCTAL) 
ENABLE INTERRUPTS 





SEQ 369 


MSGO003 


CSESCAPE 
L10061-. 


CSERHRD 
690 


ERROO6 
MSGO003 


CSESCAPE 
L10061-. 


ISSUE GET COMMAND PORT COMMAND 
DNI ? 


YES 

‘FATL' BIT SET? 

NO, REPORT ERROR 
TRAP 
. WORD 
. WORD 

| . WORD 

AND ABORT TEST 
TRAP 
. WORD 


WRITE ONE TO CLEAR DNI 
ar ? 


CSERHRD 
691 
ERRO10 
MSGOO03 


CSESCAPE 
L10061-. 





HAROWARE TESTS 
TEST 27: PRINT 


11678 


1 
11701 
10 


1 
11702 
1 


11703 


101604 
101610 
1 


101622 


101624 
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DEVICE PARAMETERS 


004737 


026652’ 


102174’ 


102437' 


102362’ 
102174! 
117777 
000014 


102320’ 
102200' 


102204' 
020177' 
000002 


000006 
102172! 
020204 ' 
000002 
000006 
102330’ 


020177' 
000002 


000006 


102176' 
020177' 
000002 


102176’ 
102176’ 





JSR 
ERRHRD 


ESCAPE 


a 
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TEST 


PC ,CHKFTL 
692. ,ERROO6, MSGO03 


TST 


;GET SWITCH PACK INFO READY TO PRINT 


150$: 


160$: 
170$: 


180$: 


: PRINT 


PRINTB 


PRINTB 


PRINTB 


SWPACK ,R4 

R4 

160$ 
#LPMSG1,LPMSG 
170$ 
#LPMSGO,LPMSG 
SWPACK ,R4 
#117777,R4 
#12. ,R0 

R4 

RO 

180$ 


#BTTBL .R4 
CR4),BTMSG 


@FRMO1S, @DEFHOR 
oF RMO16, RREV 
@FRMO15, ¢SWHOR 


#FRMO15,LPMSG 





SEQ 370 
‘FATL' BIT SET? 
YES, REPORT ERROR 
TRAP CSERHRD 
-WORD 692 
-WORD ERROOG 
-WORD MSGO03 
AND ABORT TEST 
TRAP CSESCAPE 
-WORD L109061-. 
SWITCH PACK -> R4 
“sy MODE ENABLED? 
POINT TO MFG MODE EN MSG 
SKIP DISABLED MSG 
POINT TO MFG MODE DISABLED MSG 
SWITCH PACK -> R4 
MASK BITS 14 AND 13 
SHIFT BITS FOR INDEX 
INDEX INTO BOOT TABLE 
LOAD INTO BOOT MESSAGE 
PRINT DEFAULT PHYSICAL ADDRESS 
MOV #FRMO1LS, -CSP) 
MOV SP ,RO 
TRAP CSPNTB 
ADD #6 ,SP 
PRINT MICROCODE REV 
MOV RREV.-CSP) 
MOV oFRMO16, -CSP) 
MOV #2,-(SP) 
MOV eRO 
TRAP C$PNTB 
D #6 ,SP 
PRINT SWITCH PACK HEADER 
MOV @SWHDR , - (SP) 
MOV #FRMO15, -CSP) 
MOV »RO 
TRAP CSPNTB 
ADD #6 , SP 
PRINT LOOPBACK MESSAGE 
MOV SP RO 
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TEST 27: PRINT DEVICE PARAMETERS TEST - SEQ 371 


102016 104414 TRAP CSPNTB 
102020 062706 000006 ADO 6, SP 
11704 102024 PRINTB #@FRMO15,STMSG ; PRINT BOOT MESSAGE 
102024 013746 102200' MOV BIMSG, -C SP ) 
102030 012746 020177’ MOV OF RMO1LS, -C SP) 
102034 012746 000002 MOV @2,-(SP) 
102040 010600 MOV SP ,RO 
102042 104414 TRAP CSPNTB 
102044 062706 900006 ADD 06 , SP 
11705 ; 
11706 102050 250$: 
ype 102050 004737 030346’ JSR PC ,CLINTR ; INSURE DELUA INTR BITS CLEAR 
11709 102054 EXIT TST 
102054 104432 TRAP CSEXxIT 
_— 102056 000104 «WORD 1L10061-. 
11711 ;LOCAL TEST MESSAGES 
11712 


11713 102060 104 105 114 T27ID:.ASCIZ ‘DELUA PRINT DEVICE PARAMETER ' 


102110 105 124 105 
102113 122 040 000 


11714 -EVEN 
11715 102116 124 110 111 T27SKP:.ASCIZ ‘THIS TEST PERFORMED 1ST PASS ONLY ‘ 


102157 040 000 

11716 : 

11717 102162 ENDTST 
102162 
102162 104401 





-—— 





- - 
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ee LL 


12-Jul-85 09:33 Page 119 


PRINT DEVICE PARAMETERS TEST 


102164 
102166 
102170 


102172 


102174 
102176 
102200 


102202 
102203 


162204 
102207 
102212 
102215 
102220 
102223 


102311 
102312 


000000 
000000 
000000 


000 


;LOCAL STORAGE FOR TEST 27 
DPA: .W 


‘ 
RREV: 


; 
SWPACK: . 


LPMSG: 
oo 


HEXDAT : ’ 
HEXVAL: . 


> 
DEFHDR: . 


DEFADR: 


a 
HEXTBL : 


-ASCIT 


.ASCIT 


ORD 0 
-WORD 0 
-WORDB O 
-WORDB O 
0 
-WORD 0 
-WORD 0 
0 
0 


; DEFAULT PHYSICAL ADDRESS (15:00) 
; DEFAULT PHYSICAL ADDRESS (31:16) 
; DEFAULT PHYSICAL ADDRESS (47:32) 


; MICROCODE REVISION 
; SWITCH hr CONTENTS 
LOOPBACK MESSAGE ADDRESS 
: BOOT MESSAGE ADDRESS 


; HEX DATA FOR CONVERSION 
; ASCII HEX VALUE 


<15><12>/ETHERNET DEFAULT ADDRESS (HEX): / 





SEQ 372 
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1 
11775 


11776 


11777 
11778 


11779 


11780 
1 


192314 
102316 


102320 

02322 
102324 
102326 


102362’ 
102437’ 


102513° 
102627' 
102551' 
102513’ 
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TEST 


;L00P MESSAGE TABLE 


LPTBL: 


. WORD 
;BOOT MESSAGE TABLE 
BTTBL: -W 


;ASCII MESSAGES ms 


SWHDR: 


LPMSGO: 


LPMSG1: 


BTMSGO: 


-ASCII / 


. WORD 


-ASCIZ 


-ASCIZ 


-ASCII / 


-ASCIZ 


-ASCII / 


<15><12>/SWITCH PACK SET FOR :/ 


<15><12> 


SELF TEST MANUFACTURING MODE DISABLED/ 


<15><12> 
SELF TEST MANUFACTURING MODE ENABLED/ 


<15><12> 
NO REMOTE BOOT ENABLED/ 





SEQ 373 


— - 





LT 
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TEST 27: PRINT DEVICE PARAMETERS TEST 


11781 102546 
11782 102551 
192554 


11783 


11784 
1 


11785 
11786 


— 





SCIZ <15><12> 


000 A 
040 BIMSGi: .ASCII / REMOTE BOOT, WITH SYSTEM LOAD, ENABLED/ 


000 -ASCIZ <15><12> 
040 BIMSG2: .ASCII / REMOTE BOOT ENABLED WITH ROM/ 


000 -ASCIZ <15><12> 
EVEN 





SEQ 374 
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MACRO 
TEST 27: PRINT DEVICE PARAMETERS TEST SEQ 375 


Page 120 


tend . TITLE PARAMETER CODING 
ree .SBTTL HARDWARE PARAMETER CODING SECTION 
11821 
11822 3+¢ 
11823 ; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
11824 ; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. HE 
11825 ; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
11826 ; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. 
11827 ; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
11828 ; WITH THE OPERATOR. 
11829 3-- 
11830 
11831 102674 BGNHRD 
102674 000010 -WORD L10062-L $HARD/2 
— 102676 LSHARD: : 
11833 102676 GPRMA ASKCSR,0O,0,.174510,174610,N0 sFIRST P-TABLE QUESTION 
102676 000021 «WORD T$ 
102700 102716’ -WORD ASKCSR 
102702 174510 -WORD TSLOLIM 
102704 174610 -WORD TSHILIM 
11834 
11835 
11836 102706 GPRMA ASKVEC,2,.0,120,220,.N0 ;SECOND P-TABLE QUESTION 
02706 001021 -WORD TSCODE 
102710 102751’ -WORD ASKVEC 
102712 000120 -WORD TSLOLIM 
102714 000220 -WORD TSHILIM 
11837 
11838 102716 ENDHRD 
-EVEN 
102716 
11839 
11840 102716 127 110 101 ASKCSR: .ASCIZ /WHAT IS THE PCSRO ADDRESS?/ 
102721 124 040 111 
102724 123 04ac 124 
102727 110 105 040 
102732 120 103 123 
102735 122 060 040 
102740 101 104 104 
102743 122 105 123 
102746 123 077 000 
11841 102751 127 110 101 ASKVEC: .ASCIZ /WHAT IS THE VECTOR ADDRESS?/ 
102754 124 040 111 
102757 123 040 124 
102762 110 1905 040 
102765 126 105 103 
102770 124 117 122 
102773 640 101 104 
102776 104 122 105 
103001 123 123 077 
103004 000 
11842 -EVEN 


= 
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SOFTWARE PARAMETER CODING SECTION 









33900 .SBTTL SOFTWARE PARAMETER CODING SECTION 
11846 soe 
11847 ; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
11848 ; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
11849 ; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
11850 ; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
11851 ; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
11852 ; WITH THE OPERATOR. 
11853 s- 
11854 
1185S 103006 BGNSFT 
103006 000003 -WORD L10063-LSSOFT/2 
103010 L$SOFT:: 
11856 | 
11857 103010 GPRML ASKEXT,0O,1,YES 
103010 000130 -WORD TSCODE 
103012 103016’ -WORD ASKEXT 
103014 000001 -WORD 1 
11858 EVEN 
11859 
11860 103016 ENOSFT 
& EVEN 
103016 L10063: 
11861 


11862 ree ohn 122 125 4 ASKEXT: .ASCIZ /RUN TEST 26 IN EXTERNAL LOOPBACK MODE ?/ 


10 114 117 117 
103051 1 102 101 
103054 103 113 
103057 115 117 104 
103062 105 040 077 
103065 000 
11863 EVEN 
11864 
11865 103066 $PATCH: 
11866 103066 -BLKW 20 
11867 
11868 103126 LASTAD 
103126 000000 
103130 000000 
103132 LSLAST:: 
£1869 103132 
11870 000001 .END 
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Symbol table 
ADR + 000020 G 


a 

L ol 

“ 

~~ 

o 
seesepeepeeupeupeueupeeueeeeeeeeeeeeees 


000001 G 
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C$GPRI= 


CSINLP= 
CSMANI= 
CSMAP = 
CSMEM = 
CSMMU = 
C$MSG = 
CSOPNR= 
CSOPNW= 
CSPNTB= 
CS$PNTF = 
CS$PNTS= 
CSPNTX= 
C$PUTB= 
CSPUTW= 
CsQIo = 
C$RDBU= 
CSREFG= 
CSREL = 
C$RESE= 
CSREVI= 
CS$RFLA= 








016542R 
016544R 
016546R 
000004 


000222R 
002100 
000035 
001000 G 


000002 G 
016752R 
017007R 


G 


000002 G 
031160R 
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SEQ 378 


GETPCB= 000001 G ISSFT = 000041 L$HPCP 000016RG L10040 041166R OsSAU = 000001 
GOODST= 090000 G IsSRV = 000041 LSHPTP 000022RG L10041 041716R OSBGNR= 000001 
GSCNTO= 090200 IsSUB = 000041 LS$HW 000214RG L10042 043156R O$BGNS= 000001 
GSDELM= 000372 ISTST = 000041 L$ICP 000104RG L10043 044572R 0s0U = 000001 
GsDISP= 000003 J$JMP = 000167 L$INIT O33530RG L1i0044 046154R OSERRT= 000001 
GSEXxCP= 000400 LOBUF 031404R L$LADP 000026RG L19045 047574R O$GNSW= 000001 
G$HILI= 000002 LOBUFC 031446R L$LAST 103132RG L10046 050702R O$POIN= 000001 
G$LOLI= 000001 LOBUFR 031520R L$LOAD 000100RG L10047 052320R OSSETU= 000000 
G$NO0 = 000000 LODEST 031704R L$LUN 000074RG L10050 053612R PATRN1 016626R 
GSOFFS= 000400 LODFLT 031732R L$MREV O00050RG L1i0051 055422R PCBB 000300R 
GSOFSI= 000376 LOMEM 012674R L$NAME QO00000RG L10052 061104R PCEI = 040000 G 
GSPRMA= 000001 LOPCBB 9 032002R L$PRIO 000042RG L10053 5040R PCEIB = 000100 G 
GSPRMD= 000002 LOPCSR 032032R L$PROT 033522RG L10054 071300R PCSRO 000224R 
G$PRML= 000000 LDPHYA 032050R L$PRT  000112RG L1i00S5 073576R PCSROC 000236R 
GSRADA= 000140 LDORDRB 032070R L$REPP 000062RG L10056 075242R PCSROU 000234R 
GSRADB= 000000 LORDRX 032126R L$REV Q000010RG L10057 077132R PCSR1 000226R 
G$RADD= 000040 LDTDRB 032164R L$RPT 033514RG L10060 100776R PCSR2 000230R 
GSRADL= 000120 LDOTDRX 032222R L$SOFT 103010RG L10061 102162R PCSR3 000232R 
G$RADO= 000020 LOUDBB 032260R L¢SPC O00056RG L10062 102716R PCTO = 000200 G 
GSXFER= 000004 LOXCRC 032314R L$SPCP 000020RG L1i0063 103016R PDMD = 000010 G 
GSYES = 000010 LDXRDR 032340R L$SPTP 000024RG MEMLOA 015634R PNOP = 000006 G 
HALT = 000016 G LDXTDR 032370R L$STA OO00030RG MEM11A 015706R PNT = 001000 G 
HELP =» 000000 LOE = 040000 G L$SwW 000222RG MEM13A 015712R PNTID 032734R 
HMEXDAT 102202R LOT =» 900010 G L$TEST 000114RG METER 016602R POLYH 016614R 
HEXDPA 031236R LPMSG 102176R L$TIML 000014RG MNMSGi 020705R POLYHI= 120001 G 
HE XH 031320R LPMSGO 1023562R L$UNIT 000012RG MODE15 016464R POLYL 016616R 
HE XL 031356R LPMSG1 102437R L10000 000220R MODE17 016466R PRI = 002000 G 
HEXTBL 102275R LPTBL 102314R L10001 000224R MODE20 016470R PRILD = 000001 G 
HEXVAL 102205R LSMA 012450R L10002 021706R MODE21 016472R PRIOO = 000000 G 
HOE = 100000 G L$ACP 000110RG L10003 021734R MODE24 016474R PRIO1 = G 
IBE == 010000 G L$APT  O00036RG L10004 021766R MODE2S 016476R PRI02 = 000100 G 
IDU = 000040 G L$AU 034356RG L10005 022040R MSGOO1 021664RG PRIO3 = 000140 G 
IE = 000100 G L$AUT Q00070RG L10006 022202R MSGO02 021710RG PRIO4 = 000200 G 
ER = 020000 G L$AUTO 034340RG L10007 022344R MSGOO3 021736RG PRIOS = 000240 G 
INITH = 000000 G L$CCP 000106RG L10010 022376R MSGO04 021770RG PRIO6 = 000300 G 
INTE = 000100 G L$CLEA 034342RG L10011 022460R MSGOOS 022042RG PRIO7 = 000340 G 
INTMG1 030060R L$Cco 000032RG L10012 022602R MSGO06 022204RG PRNTIT 016620R 
INTR = 000200 G L$DEPO 000011RG L10013 022630R MSGO07 022346RG RBUF 006440R 
INTVEC 000240R L$DESC 016666RG L10014 022656R MSGOO08 022400RG RBUF2 007040R 
ISR = 000100 G L$DESP 000076RG L10015 033520R MSGO09 022462RG RBUF3 007440R 
ISRONI 034374RG L$DEVP 00 L10017 034336R MSGO10 922604RG RBUF&4 010040R 
ISRNXM 034364RG L$DISP 000124RG L10020 034340R MSGO11 022632RG RBUFS 010440R 
IXE = 004000 G L$DLY 000116RG L10021 034346R MSG1 020570R RBUF6 011040R 
ISAU = 000041 L$DTP Q00040RG L10022 034354R MULTL 016074R RBUF7 011440R 
ISAUTO= 000041 L$DTYP 000034RG L10023 034362R MULTLC 016170R RBUF& 012040R 
ISCLN = 000041 L$DU 034350RG L10024 034372R M68FLD 021202R RCBI = 002000 G 
IsdDU = 000041 L$DUT 000072RG L10025 034426R NEXMEM 016604R RCBIB = 000004 G 
ISHRD = 000041 L$DVTY 016660RG L10026 034442R NIHLT = 000006 G RDCNT 012550R 
ISINIT= 000041 LS€F 000052RG L10027 034622R NIUNI = 000007 G RDDEFA 012460R 
IsMOD = 000041 L$ENVI 000044RG L10030 035010R NIUNIB 021406R RDMODE 012570R 
ISMSG = 000041 LSERRT 016650RG L10031 035216R NOCLK 021140R RDMULA 012510R 
T$PROT= 000040 LSETP 000102RG L10032 035404R NOPF 012440R RDPHYA 012470R 
ISPTAB= 000041 LSEXP1 O00046RG L10033 035572R NORXI 032422R RDRB 000660R 
ISPWR = 000041 LSEXP4 000064RG L10034 036010R ONEFIL= 000001 RORBE 000720R 
ISRPT = 000041 L$EXPS O00066RG L1i0035 036226R ONES = 177777 G RDRBXX 013570R 
ISSEG = 000041 L$HARD 102676RG L10036 036554R OWN = 100000 G RDRB1A 012750R 
ISSETV= 000041 L$HIME 000120RG L10037 040614R OSAPTS= 000000 RDRBiB 013010R 
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Symbol table 
RORB2A 013050R SMSG17 037174R TBUFS 003436R TS$TAGN= 0320064 T22I0 071250R 
RORBSA 013110R SMSG20 037175R TBUF4 004036R TSTEMP= 000000 T23 071302RG 
RDRB4A 013540R SMSG21 037234R TEUFS 004436R TSTEST= 000033 T2310 073534R 
RORB4B 013150R SMSG22 037273R TBUF6 #005036R T$TSTM* 177777 T24 073600RG 
RORBSA 013410R SMSG23 037322R TBUF7 005436R T$TSTS= 000001 T24ID 075162R 
RDRNGS 012530R SMSG24 037360R TBUF& 006036R T$$AU = 010023 T25 075244RG 
RORX 001624R SMSG25 037417R TORE 000620R T$$AUT= 010020 T25ID 077072R 
RDRi4B 016374R SMSG26 037456R TORBXX 014740R T$$CLE= 010021 T26 077134RG 
RDRiSA 016404R SMSG27 037523R TORBIA 014410R T$$DU = 010022 T26ID 100744R 
RDRI7A 016414R SMSG30 037562R TORBiB 014450R TS$HAR= 010062 T27 101000RG 
RORI7B 016424R SMSG31 037563R TORBiC 014510R T$$HW = 010000 T27I0 102060R 
RDR2ZOA 0164342 SMSG32 037564R TORB1iD 014530R T$$INI= 010017 T27SKP 102116R 
ROR2ZOB 016444R SMSG33 037565R TORBiE 014550R T$$MSG= 010014 3 35012RG 
OC 016454R SMSG34 037566R TORB2A 014600R T$$PRO= 010016 TG 035220RG 
ROSTA 012644R SMSG35 037567R TORB2B 014640R T$$kPT= 010015 TS 025406RG 
READY = 000002 G SMSG36 037570R TORB3A 014700R T$$SOF= 010063 T6 035574RG 
REND = 012440R SMSG37 037571R TORB4A 015570R T$$SRV= 010026 17 036012RG 
REPLY  016622R SMSG40 037572R TORMSK= 007777 G T$$SW = 010001 T8 036230RG 
RESET = 000000 G SMSG41 037606R TORX 001014R T$$TES= 010061 T9 040166RG 
RFRMT 012704R SMSG42 037622R TORI4A 016264R TO1ID § 034570R UAM = 000200 G 
RFRMTE 012734R SMSG43 037636R TORISA 016274R TO2ID 034756R UDBB 000310R 
RFRMTX 012720R SMSG44 037652R TORI8A 016304R TO3ID 035172R UDB10A 015622R 
RMTC = 000010 G SMSG45 037666R TOR18B 016314R TO4ID 035352R UDB11A 015674R 
ROMCRC 032462R SMSG46 037702R TOR2Z0A 016324R TOSID 035540R UDB28A 016500R 
RREV 102172R SMSG47 037733R TOR20B 016334R TO6ID 035760R UNAPRI 000242R 
RSET = 000040 G SMSG5O 037764R TOR21X 016344R TO7ID 036176R UNDFND 021501R 
RUN *# 000003 G SMSG51 040000R TOR24A 016354R TO8ID 036534R UNIHLT= 000005 
RXI = 020000 G SMSGS2 040014R TOR24B 016364R TO9ID 040570R UNIT 000244R 
RXIB = 000040 G SMSG53 040030R TEND = 006436R Ti 034444RG USCI = 000400 G 
SECOND= 000077 G SMSG54 040044R TIMASK= 000377 G T10 040616RG USCIB = 000001 G 
SERI = 100000 G SMSG55 040060R TIMOFF 033402R T10ID 041136R WMODE 012600R 
SERIB = 000200 G SMSG56 040074R TIMON 033416R Til 041170RG WIMOD1 012610R 
SETBF 032544R SMSGS7 040110R TINIT 033434R T11ID 041664R “TMOD2 012620R 
SETBUF 033006R SMSG60 040124R TSTFMT 032770R Ti2 041720RG WTMOD3 012630R 
SFPTBL 000222RG SRC 000264R TXI = 010000 G T12ID 4 ©=©—.043114R WTMOD4 012640R 
SIZ4K = 020000 G SRCDST 033206R TXIB = 000020 G T13 043160RG WTMULA 012520R 
SIZ8K = 040000 G SRWRAM 033256R TSARGC= Ti3ID 044540R WTPHYA 012500R 
SKIP 020775R START = 000004 G T$CODE= 000130 T14 044574RG WTRNGS 012540R 
SKIP26 021056R STATEM= 172377 G TSERRN= 001264 Ti4ID ©046130R XCRC 016574R 
SLFT = 000003 G STMASK= 140377 G TSEXCP= 000000 T1i5 046156RG XCRCB 016576R 
SMASK = 177770 G STMSG 036556R T$FLAG= 000040 TiSID 047544Rk XDAT 016566R 
SMSGOO 036722R STOP = 000017 G TS$GMAN= 000000 T16 047576RG XRDRBO 016530R 
SMSGO1 036745R STP = 001000 G TSHILI= 000220 T16ID 050650R XRDRB2 016532R 
SMSGO2 036761R STTBL  036560R T$LAST= 000001 717 050704RG XRDRB4 016534R 
SMSGO3 036775R SVCGBL= 000000 TSLOLI= 000120 T17ID 052260R XRDRB6 016536R 
SMSGO4 037011R SVCINS= 000001 T$LSYM= 010000 T18 052322RG XTDORBO 016550R 
SMSGOS 037025R SVCSUB= 000001 T$LTNO= 000033 T1i8ID «© 053552R XTDRB2 016552R 
SMSGO6 037041R SVCTAG= 000001 TSNEST= 177777 T19 053614RG XTORB4 016554R 
SMSGO7 037055R SVCTST= 000001 T$NSO = 000000 T1i9ID ©055374R XTORB6 016556R 
SMSG10 037071R SWADDR 016512R T$NS1 = 000U05 2 034624RG X$ALWA= 000000 
SMSG11 037125R SWHDR 102330R T$PTNU= 000000 T20 055424RG X$FALS= 000040 
SMSGi2 037154R SWPACK 102174R T$SAVL= 177777 T20ID 061054R X$OFFS= 000460 
SMSG13 037170R S$LSYM= 010000 T$SEGL= 177777 T21 061106RG X$TRUE= 000020 
SMSG14 037171R TBUF 002436R T$SUBN= 000000 T21ID 065006R ZERO = 000000 G 
SMSGi15 037172R TBUF2 #003036R T$TAGL= 177777 T22 065042RG $PATCH 103066R 
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Symbol table 


. ABS. 900000 000 «= (RW, I, GBL , ABS, OVR) 
103132 001 (RW,I,LCL.REL.CON) 


Errors detected: 0 


ase Assembler statistics 


Work file reads: 320 

Work file writes: 325 

Size of work file: 36704 Words ( 144 Pages) 
Size of core pool: 19402 Words ( 74 Pages) 
Operating system: RSX-11M/PLUS (Under VAX/VMS) 


Elapsed t:me: 00:24:28.58 
CZUADA,CZUADA/ -SP/CRF/NL : TOC=SVC40/ML,CZUADA 


